Non символьный аргумент в R строки разделенной функции (strsplit)

Question

Это работает

x <- "0.466:1.187:2.216:1.196" 
y <- as.numeric(unlist(strsplit(x, ":"))) 

Значения blat$LRwAvg все выглядят как X выше, но это не работает

for (i in 1:50){ 
    y <- as.numeric(unlist(strsplit(blat$LRwAvg[i], "\\:"))) 
    blat$meanLRwAvg[i]=mean(y) 
} 

Из:

Ошибка в strsplit (blat $ LRwAvg [i], "\:"): несимвольный аргумент

Не имеет значения, есть ли у меня одна, две или нулевые обратные косые черты.

В чем моя проблема? (Не вообще, я имею в виду в этой специальной задачи, технически)

Answer 1

Как agstudy подразумеваемой blat$LRwAvg <- as.character(blat$LRwAvg) перед выполнением цикла фиксированной его

blat$meanLRwAvg <- blat$gtFrqAvg #or some other variable in data frame with equal length 
blat$LRwAvg <- as.character(blat$LRwAvg) 
for (i in 1:50){ 
    y <- as.numeric(unlist(strsplit(blat$LRwAvg[i], "\\:"))) 
    blat$meanLRwAvg[i]=mean(y) 
}