eval解析的意外结果

时间:2013-10-26 11:42:02

标签: r parsing loops eval

我有322个区域的一组相同尺寸的表。我需要将这些表格加到29个更高级别的区域,并且每个更高级别的区域都有不同数量的较低级别区域。

我建议在循环中计算总和,因此第一项任务是确定要求和的较低级别区域的数量(每个区域都有字符标识符)。

例如,第一个较低级别区域列表是四个列表:

lad_list_black
[1] "00CW" "00CU" "00CS" "00CR"

较高区域列表由最后一项区分 - 在本例中为“黑色”。接下来是“雄鹿”(即lad_list_bucks)等等。

我建议使用一个循环来计算第一步中较低级别区域的数量 - 类似

nam <- c("black","bucks")

lad_list_black <- c("00CW","00CU","00CS","00CR")

for(i in 1:1){
eval(parse(text=length(paste("lad_list_",nam[i],sep=""))))}

但是当我在循环外测试它时,结果是:

eval(parse(text=length(paste("lad_list_",nam[1],sep=""))))
[1] 1

这是不正确的,因为:

length(lad_list_black)
[1] 4

0 个答案:

没有答案