Guest User

Untitled

a guest
Jul 17th, 2018
64
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.61 KB | None | 0 0
  1. Error in ab() <- reactive(join(a(), b())) : invalid (NULL) left side of assignment
  2.  
  3. a <- reactive({ MyData %>%
  4. filter( Primary_family == input$selected_product & Metric_name == input$selected_metric) %>%
  5. group_by(Month_considered) %>%
  6. mutate(`pct` = as.numeric(as.character(Metric_Value))*100 ) %>%
  7. select(Month_considered,`pct`) })
  8.  
  9. b <-reactive({ MyData %>%
  10. filter(Tab == input$selected_class & Primary_family == input$selected_product) %>%
  11. group_by(Month_considered) %>%
  12. mutate(`ATC_Count` = Metric_Value) %>%
  13. select(Month_considered,`ATC_Count`) })
  14.  
  15. ab() <-reactive(join(a(),b()))
Add Comment
Please, Sign In to add comment