luận ký tự không trong chuỗi R chia chức năng (strsplit)

Question

này hoạt động

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

Giá trị của blat$LRwAvg tất cả trông giống như X trên nhưng điều này không làm việc

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

Bởi vì:

Lỗi trong strsplit (blat $ LRwAvg [i], "\:"): đối số không phải ký tự

Nó không quan trọng nếu tôi có một, hai hoặc null dấu gạch chéo ngược.

Vấn đề của tôi là gì? (Không nói chung, ý tôi là trong nhiệm vụ đặc biệt này, về mặt kỹ thuật)

Answer 1

Như agstudy ngụ ý blat$LRwAvg <- as.character(blat$LRwAvg) trước khi vòng lặp cố định nó

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) 
}