YS
от не подозрительный, но немного непривычный)
Size: a a a
2021 April 01
YS
поищу пояснение, у Мастицкого в книге было
YS
YS
🔥. Прям то что нужно))
Только вывод у него подозрительный. Сейчас буду изучать
👍
Только вывод у него подозрительный. Сейчас буду изучать
👍
посмотрите пояснение к выводу.
ВП
library(data.table)
x <- c(1:5, NA)
tmp <- data.table(
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE)
)
tmp
as.data.table(t(tmp[, lapply(.SD, function(x) sum(is.na(x)))]), keep.rownames = TRUE)
x <- c(1:5, NA)
tmp <- data.table(
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE),
sample(x, 10, replace = TRUE)
)
tmp
as.data.table(t(tmp[, lapply(.SD, function(x) sum(is.na(x)))]), keep.rownames = TRUE)
data.frame(x = (apply(is.na(tmp), 2, sum)), names=names(tmp)) не тоже самое?
ВП
или это и есть "не лучшее решение" в лоб? ))
K
Есть вектор, он может быть произвольной длины:
vec <- c("year", "cost")
Как преобразовать этот вектор в такой список, чтобы для каждого значения вектора формировался свой список и потом это все собиралось в один общий список.
list(year =
list(id = "year", title = "year"),
cost =
list(id = "cost", title = "cost")
)
vec <- c("year", "cost")
Как преобразовать этот вектор в такой список, чтобы для каждого значения вектора формировался свой список и потом это все собиралось в один общий список.
list(year =
list(id = "year", title = "year"),
cost =
list(id = "cost", title = "cost")
)
A
lapply(vec, function(x) list(id = x, title = x))
K
lapply(vec, function(x) list(id = x, title = x))
Спасибо!
PU
Владимир Попукайло
data.frame(x = (apply(is.na(tmp), 2, sum)), names=names(tmp)) не тоже самое?
да то же самое, просто другим синтаксисом
я накостылял с использованием t(), но можно и без него, да
тип такого
я накостылял с использованием t(), но можно и без него, да
тип такого
data.table(
names(tmp),
tmp[, sapply(.SD, function(x) sum(is.na(x)))]
)
PD
да то же самое, просто другим синтаксисом
я накостылял с использованием t(), но можно и без него, да
тип такого
я накостылял с использованием t(), но можно и без него, да
тип такого
data.table(
names(tmp),
tmp[, sapply(.SD, function(x) sum(is.na(x)))]
)
тогда уж _капельку_ элегантнее и в базе:
если бы еще можно было в одно действие именнованный вектор перевернуть…
data.frame(
var = names(tmp),
n_na = apply(is.na(tmp), 2, sum)
)
если бы еще можно было в одно действие именнованный вектор перевернуть…
ВП
тогда уж _капельку_ элегантнее и в базе:
если бы еще можно было в одно действие именнованный вектор перевернуть…
data.frame(
var = names(tmp),
n_na = apply(is.na(tmp), 2, sum)
)
если бы еще можно было в одно действие именнованный вектор перевернуть…
кажется, вы повторили моё сообщение :)
PD
Владимир Попукайло
кажется, вы повторили моё сообщение :)
точно! стыдно, прочитал поверхностно)
в общем, согласен с таким вариантом
в общем, согласен с таким вариантом
HC
Товарищи, как лучше параллельно/одновременно запустить много веб краудлеров с 1 ПК?
St
Всем привет. Подскажите, как можно месяц и год в числовом формате объединить в дату?
HC
as.Date(paste("2021", "3", "1"), format = "%Y %m %d")
AM
ISOdate лучше использовать. Чтобы в строку из числа не переводить
2021 April 02
St
Herman Cherniaiev
as.Date(paste("2021", "3", "1"), format = "%Y %m %d")
как в таком случае можно использовать paste для данных из двух столбцов?
St
все, разобрался, спасибо за помощь