Question

我一直在乱用R编码而我遇到了一些麻烦。这是我的代码：

# Pre-defined variables
rquote <- "R's internals are irrefutably intriguing"
chars <- strsplit(rquote, split = "")[[1]]

# Your solution here
result<-c()
for (v in chars) {
if (v=="r" | v=="R") {
} else if (v >= "u") {
break
} else {
next
}
result[v]<-v
}
result

我希望结果将包含for循环创建的所有打印输出。它应该是＆＃34; R＆＃34;接下来是四个＆＃34; r＆＃34;。但是，我最终只得到一个具有＆＃34; R＆＃34;和＆＃34; r＆＃34;只（因此只有五个元素中的两个）。有谁知道我怎么能得到完整的载体？

Answer 1

您应该查看中间值的特征：

result<-c(); i=1
while ( chars[i] != "u") {
if (chars[i]=="r" | chars[i]=="R") {
result[i] <- chars[i]
} else { result[i] <-""}
 i=i+1
}
result
#------
[1] "R" ""  ""  ""  ""  ""  ""  ""  "r" ""  ""  ""  ""  ""  ""  "r" ""  "" 
[19] ""  "r" "r" ""  ""

我认为，当角色是“你”时，一段时间循环会更符合你明显的停止处理的愿望：

{{1}}

R编程：将for循环的打印输出保存到矢量

1 个答案: