关于function rep()

加菲不是加菲

function rep() 有一个例子：

x <- .leap.seconds[1:3]
   x
   #[1] "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST"
rep(x, 2)
   #[1] "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST" "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST"
   #[6] "1974-01-01 08:00:00 CST"
rep(as.POSIXlt(x), rep(2, 3))
  
   #[1] "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST" "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST"
   #[6] "1974-01-01 08:00:00 CST"


rep(2,3) 的结果应该是输出 2 2 2，然后 rep(as.POSIXlt(x), rep(2, 3))这个语句输出以上结果，该如何解释？

龙城飞将V

1. x<-.leap.seconds[1:3]
   
2. x

复制代码

结果为：[1] "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST"

龙城飞将V

1. rep(x,2)

复制代码

结果为：[1] "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST" "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST"

龙城飞将V

1. rep(as.POSIXlt(x),rep(2,3))

复制代码

结果为：[1] "1972-07-01 08:00:00 CST" "1972-07-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1973-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST" "1974-01-01 08:00:00 CST"

龙城飞将V

结果同rep(x,2)是一样的