R предупреждение: «количество заменяемых элементов не кратно длине замены»

Question

Нужно понять, почему я получаю предупреждение "количество заменяемых элементов не кратно длине замены" с простым кодом, приведенным ниже (что делает Мне нужно это сделать)?

A_DF <- data.frame(A = c(1,1,2,2,3,4), B = c(0,0,0,0,0,0))

A_DF <- A_DF %>% mutate(B = replace(B, A<=2, A), B = replace(B, A>2, 7))

Warning message:
In x[list] <- values :
  number of items to replace is not a multiple of replacement length

Выход:

A_DF
  A B
1 1 1
2 1 1
3 2 2
4 2 2
5 3 7
6 4 7

Answer 1

Проблема в

B = replace(B, A<=2, A)

A имеет длину 6 для сжатия в подмножество B (когда A <= 2). </p>

Вы можете использовать:

A_DF <- A_DF %>% mutate(B = A, B = replace(B, A>2, 7))

Или:

A_DF$B <- ifelse(A_DF$A>2,7,A_DF$A)