R блестящий: преобразование реактивных данных. Кадр с использованием реактивных значений и наблюдения
У меня проблемы с преобразованием реактивного data.frame с использованием реактивных значений и наблюдения. Я более знаком с использованием обычного реактивного () и не могу понять значения реактивного. Я хотел бы добавить столбец с названием "Биомасса" в data.frame с именем tmp3. Я могу преобразовать tmp2 и добавить столбец с именем "Class" и один "Common" без проблем. Небольшой фрагмент сервера ниже. Если я попытаюсь использовать transform, чтобы добавить столбец "Биомасса", приложение не запустится. Я надеюсь, что кто-то может быстро взглянуть на это и выправить меня. Дайте мне знать, если необходимо предоставить полный код.
globals <- reactiveValues()
observe({
dat=read_lake_survey(SiteID())
surveys <- dat$result$surveys
tmp2 <- map2(surveys$fishCatchSummaries, surveys$surveyDate, ~{
.x$survey_date <- .y ; .x })
tmp2 <- map2(tmp2, surveys$surveyType, ~{ .x$survey_type <- .y ; .x })
tmp2 <- map2(tmp2, surveys$surveySubType, ~{ .x$survey_subtype <- .y ; .x })
tmp2 <- map2_df(tmp2, surveys$surveyID, ~{ .$survey_id <- .y ; .x })
tmp2[tmp2 == "N/A" ] <- NA
tmp3=transform(tmp2,Class= abv$Coding[match(tmp2$species, abv$Abv)],
FullName=abv$Common[match(tmp2$species, abv$Abv)])
### No luck adding this to the transform code ######
### Biomass=tmp2$averageWeight*tmp2$totalCatch ###
globals$ScrapedData=tmp3
})
1 ответ
Проблема была в data.frame.
tmp2 <- data.frame(type_convert(tmp2)
не преобразовывает это в data.frame. Мне нужно было использовать class(as.data.frame(tmp2))
После правильного преобразования функция преобразования работала нормально