警告：较长的对象长度不是较短对象长度的倍数

Question

我希望你不会因为这个问题而向我投票，我知道这里有一些关于同一主题的问题，但我不明白为什么会这样。

我收到此错误消息： 警告：

1. In test* rep(mean(c(sec)), n) + (1 - test) * c(sec)

较长的物体长度不是较短物体长度的倍数

现在，公式是：

  Sec<-  test* rep(mean(c(sec)), n) + (1 - test) * c(sec)

sec从txt文件中获取值。

你可以帮我理解吗？ 我应该在哪里看看？

提前致谢

Answer 1

语法可以重写为

Sec <- test * rep(mean(sec), n) + (1 - test) * sec

我认为问题在于物体的长度不一样。

检查：

length(test)
n
length(sec)

如果n是一个，那么在这种情况下你不需要重复。试试这段代码：

Sec <- test * mean(sec) + (1 - test) * sec

test和sec的哪些类？

class(test)
class(sec)