[问题叙述]:
我有个程式码会把外部档案的档名存入固定变量，之后要换档案分析，只要重新
choose.files再
tableName <- strsplit(basename(raw_name), ".", fixed = TRUE)[[1]][1]
> tableName
[1] "midterm_table"
就可以在tableName存入档名字串，我只要用get(tableName)就可以取代所有
原本主档名字串(本范例用"midterm_table")，譬如：
sapply(get(tableName), class) %>% unique()
这是成功的。
下面的程式码，我是要列出表格中的NA，把他改成一个"noData"方便之后计算，
get(tableName)$Other.Injury[is.na(get(tableName)$Other.Injury)]
成功执行，会显示一整串NA(废话)，但是当我多加后面修改的自串
get(tableName)$Other.Injury[is.na(get(tableName)$Other.Injury)] = "noData"
Error in get(tableName)$Other.Injury[is.na(get(tableName)$Other.Injury)] =
"noData" :
could not find function "get<-"
但是改成字串档名
midterm_table$Other.Injury[is.na(get(tableName)$Other.Injury)] = "noData"
这样就成功了。
我不懂那个could not find function "get<-"是怎么回事，因为其他程式码都get这样
也没问题，何况同一句后面也有用get(...)$，却唯独这个语法会出错。
请问有人知道问题出在哪边吗？
[环境叙述]:
R version 3.4.4 (2018-03-15)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 7 x64 (build 7601) Service Pack 1
Matrix products: default
locale:
[1] LC_COLLATE=Chinese (Traditional)_Taiwan.950 LC_CTYPE=Chinese
(Traditional)_Taiwan.950
[3] LC_MONETARY=Chinese (Traditional)_Taiwan.950 LC_NUMERIC=C
[5] LC_TIME=Chinese (Traditional)_Taiwan.950
attached base packages:
[1] stats graphics grDevices utils datasets methods base
other attached packages:
[1] openxlsx_4.0.17 magrittr_1.5
loaded via a namespace (and not attached):
[1] compiler_3.4.4 tools_3.4.4 yaml_2.1.14 Rcpp_1.0.0