데이터 프레임을 어떻게 생성했느냐에 달려있는 것 같습니다.

아래와 같이 데이터 프레임을 생성하면 무한 출력되지 않는 것 같습니다.

df1 <- data.frame(
  name = c("Alice", "Bob", "Charlie", "David"),
  age = c(11,30,12,30)
)

for(i in df1$age){
  if(i==30){
    var <- df1$name[df1$age == 30]
    print(var)
  }
}

#출력
[1] "Bob"   "David"
[1] "Bob"   "David"

데이터 프레임을 어떻게 생성했는지 확인할 필요가 있을 것 같습니다.