Как назначить элемент POSIXlt вектору - PullRequest
Новая
       26

Как назначить элемент POSIXlt вектору

0 голосов
/ 10 января 2019

У меня есть столбец переменных даты и времени ex, из которого я хочу случайным образом выбрать один элемент и присвоить его вектору. Тем не менее, я не получаю результат, если я делаю: 

> sample(ex,1)
[1] "2017-12-24 10:42:39 GMT"
> some_vector<-rep(NA,1)
> some_vector[1]<-sample(ex,1)
Warning message:
In some_vector[1] <- sample(ex, 1) :
  number of items to replace is not a multiple of replacement length
> some_vector
[[1]]
[1] 20

Пример POSIXlt ex

structure(list(sec = c(39, 31, 12, 20), min = c(42L, 44L, 13L, 
22L), hour = c(10L, 10L, 15L, 15L), mday = c(24L, 24L, 14L, 14L
), mon = c(11L, 11L, 0L, 0L), year = c(117L, 117L, 118L, 118L
), wday = c(0L, 0L, 0L, 0L), yday = c(357L, 357L, 13L, 13L), 
    isdst = c(0L, 0L, 0L, 0L), zone = c("GMT", "GMT", "GMT", 
    "GMT"), gmtoff = c(NA_integer_, NA_integer_, NA_integer_, 
    NA_integer_)), .Names = c("sec", "min", "hour", "mday", "mon", 
"year", "wday", "yday", "isdst", "zone", "gmtoff"), class = c("POSIXlt", 
"POSIXt"))

Я хочу получить some_vector вывод как 

some_vector
[1] "2017-12-24 10:42:39 GMT"
...