You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
27 lines
773 B
27 lines
773 B
stepUI<- function(id){
|
|
ns<-NS(id)
|
|
echarts4rOutput("elaplot")
|
|
}
|
|
|
|
stepServer<-function(id, dat){
|
|
moduleServer(
|
|
id,
|
|
function(input,output,session){
|
|
output$elaplot<- renderEcharts4r({
|
|
dat |>
|
|
e_charts(cost_gl) |>
|
|
e_bar(Plan, name = "Plan", color="gray") |>
|
|
e_step(Actual, name = "Actual", color="red") |>
|
|
e_axis_labels(x = "GL+Cost Center", y="Deviation") |>
|
|
e_title("Selected Cost Centers") |>
|
|
e_tooltip() |>
|
|
e_legend(right = 100) |>
|
|
e_datazoom(x_index = 0, type = "slider") |>
|
|
e_datazoom(y_index = 0, type = "slider") |>
|
|
e_toolbox_feature(feature = c("saveAsImage","dataView")) |>
|
|
e_theme("chalk")
|
|
|
|
})
|
|
}
|
|
)
|
|
}
|