2017-11-13 11 views
0

reactiveValuesを使用して反応性data.frameを変換して観察するのに問題があります。私はregular reactive()を使う方が慣れており、reactiveValuesをあまり把握できません。私は、 "バイオマス"という列をtmp3というdata.frameに追加したいと思います。私はtmp2を変換し、 "クラス"と "共通"と呼ばれる列を問題なく追加することができます。サーバーの小さな切り札は以下の通りです。私が変換を使用して "バイオマス"の列を追加しようとすると、アプリは動かなくなります。私は誰かがすぐにそれを見て、私をまっすぐにできることを望んでいます。フルコードが必要な場合は教えてください。R shiny:reactiveValuesを使用して反応性データフレームを変換して観察する

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 
}) 
+0

"app wont run"とはどういう意味ですか?どのようなエラーメッセージが表示されますか?私はこのスニペットから光沢のある特定の問題は見られません。 –

+0

エラーは 'sourceUTF8(serverR、envir = new.env(parent = globalenv()))のエラーです:' 'です。これは、変換を使用してバイオマス列を追加しようとすると発生します。 'tmp3 = transform(tmp2、Biomass = tmp2 $ averageWeight * tmp2 $ totalCatch、Class = abv $コーディング[match(tmp2 $種、abv $ Abv)]、 FullName = abv $共通[match(tmp2 $種、abv $ Abc)]) ' – shum

+0

' totalCatch'の3番目の 't'の後にゼロ幅の非結合子(' U + 200C')を削除します。私はこれに慣れていないので、Unicode文字識別子に入れてください。 –

答えて

0

問題はdata.frameが騒ぎであったことです。

tmp2 <- data.frame(type_convert(tmp2) 

これをdata.frameに変換しません。私は使用する必要がありました class(as.data.frame(tmp2)) 正しく変換された後、変換関数は正常に機能しました

関連する問題