我如何创建一个函数来使用 echarts4r 创建绘图？
How I can create a function for create a plot with echarts4r?
大家好，晚安。我想知道是否可以创建一个函数来简化在 r 中使用 Echarts4r 创建图表的过程。我正在尝试，但出现错误 Error: Can't subset columns that don't exist.。任何人都知道我该如何解决它？我使用的代码如下：
library(echarts4r)
graf_func <- function(dataframe, vary, varx){
grafico <- base |>
e_charts(vary) |>
e_bar(varx) |>
e_tooltip(trigger = "axis")
return(grafico)
}
df <- data.frame(
var1 = runif(10, min = 100, max = 200),
var2 = runif(10, min = 10, max = 200)
)
graf_func(dataframe = df, vary = var1, varx = var2)
使用函数 e_charts_ 和 e_bar_ 并将列名作为字符传递。
library(echarts4r)
graf_func <- function(dataframe, vary, varx){
grafico <- dataframe |>
e_charts_(vary) |>
e_bar_(varx) |>
e_tooltip(trigger = "axis")
return(grafico)
}
df <- data.frame(
var1 = runif(10, min = 100, max = 200),
var2 = runif(10, min = 10, max = 200)
)
graf_func(dataframe = df, vary = "var1", varx = "var2")
大家好，晚安。我想知道是否可以创建一个函数来简化在 r 中使用 Echarts4r 创建图表的过程。我正在尝试，但出现错误 Error: Can't subset columns that don't exist.。任何人都知道我该如何解决它？我使用的代码如下：
library(echarts4r)
graf_func <- function(dataframe, vary, varx){
grafico <- base |>
e_charts(vary) |>
e_bar(varx) |>
e_tooltip(trigger = "axis")
return(grafico)
}
df <- data.frame(
var1 = runif(10, min = 100, max = 200),
var2 = runif(10, min = 10, max = 200)
)
graf_func(dataframe = df, vary = var1, varx = var2)
使用函数 e_charts_ 和 e_bar_ 并将列名作为字符传递。
library(echarts4r)
graf_func <- function(dataframe, vary, varx){
grafico <- dataframe |>
e_charts_(vary) |>
e_bar_(varx) |>
e_tooltip(trigger = "axis")
return(grafico)
}
df <- data.frame(
var1 = runif(10, min = 100, max = 200),
var2 = runif(10, min = 10, max = 200)
)
graf_func(dataframe = df, vary = "var1", varx = "var2")