R-Code Loop-Bug

Question

У меня есть небольшая проблема с работает мой R-скрипт:

sensoren <- read.csv("C:/..../sensors.csv") 
messung <- read.table("C:/.../os.log") 

s1 <- messung$V2 
s2 <- messung$V4 
s3 <- messung$V6 
s4 <- messung$V8 

i <- 1; j <- 1 
while (i <= nrow(messung)){ 
+ while (j <= nrow(sensoren)){ 
+  if (s2[i] == sensoren[j,1] && s3[i] == sensoren[j,2] && s4[i] == sensoren[j,3]){ 
+   print(sensoren[j,5][drop=TRUE]); i <- i + 1; j <- 1;} else {j <- j + 1;}}} 

Запуск сценария я всегда получаю сообщения об ошибке: Ошибка в +, а (J < = nrow (Sensoren)) {: неверный аргумент унарного оператора

Надеюсь, кто-то может мне помочь, спасибо!

Edit:

Я изменил код, и это похоже, что теперь:

while (i <= nrow(messung)){ 
+ while (j <= nrow(sensoren)){ 
+  if (c(s2[i],s3[i],s4[i]) == c(sensoren[j,1], sensoren[j,2], sensoren[j,3])){ 
+   print(sensoren[j,5][drop=TRUE]); i <- i + 1; j <- 1;} else {j <- j + 1;}}} 

Но все же самое сообщение об ошибке ...

Answer 1

Похоже nrow (Sensoren) возвращает NULL , который nrow() делает, когда его аргумент не является матрицей или фреймом данных. Убедитесь, что файл прочитан как ожидалось.

Кроме того, я ценю, что вы не спрашивали об этом, но использование вложенных циклов - это не очень «R» способ делать что-то, потому что R мучительно медленно в этих операциях. Вы можете прочитать на merge(), apply() и vectorization в R.