3482
правки
Изменения
м
Нет описания правки
attrs <- sapply(attrs, function(x) unlist(x[[1]]))
attrs.names <- unique(unlist(lapply(attrs, names)))
attrs.values <- sapply(attrs.names, function(name) sapply(attrs, "[", name))ga.metadata <- data.table(id, attrs.values)</nowiki>}}
Переменная <code>ga.metadata</code> содержит следующую информацию: