3482
правки
Изменения
м
Нет описания правки
ga.metadata_attr.names <- unique(lapply(ga.metadata_attr, names))
ga.metadata_attr.names <- ga.metadata_attr.names[[which.min(vapplysapply(ga.metadata_attr.names, length, FUN.VALUE = integer(1)))]]
ga.metadata_attr.values <- lapply(ga.metadata_attr, "[", ga.metadata_attr.names)
