问题内容: I have a program, but I need to replace loop for apply or sapply? Is this possible in my case? Can you help me? My code TD = stri_read_lines("script.R") chars = data.frame() for(i in 1:length(TD)){ if(TD[i] !='') { char= unlist(strsplit(TD[i], split="")) for ( j in 1:nchar(TD[i]) ) { chars =rbind(chars , data.frame(a=char[j], b=i, c=