3482
правки
Изменения
м
ids id <- fromJSON(getURL(paste0(url, "/id")))$items
ids id <- lapply(idsid, "[[", 1)
metadataga.list metadata <- appendcbind(list(ids)id, lapplysapply(attrs.names, function(name) lapply(attrs, "[[", name)))ga.metadata <- doas.call(data.table, metadata(ga.listmetadata)setnames(ga.metadata<- ga.metadata[, clapply("id".SD, attrsas.names)character)]</nowiki>}}
Нет описания правки
url <- "https://www.googleapis.com/analytics/v3/metadata/ga/columns?fields=items"
attrs <- fromJSON(getURL(paste0(url, "/attributes")))$items
attrs <- lapply(attrs, "[[", 1)
attrs.names <- unique(unlist(lapply(attrs, names)))
Переменная <code>ga.metadata</code> содержит следующую информацию:
