Power BI有一个内置的R编辑器,您可以使用它来为Power BI仪表板创建R视觉效果。不幸的是,当我运行下面的代码时,似乎无法找到我加载的ggplot2包:
solve_sir_model <- function (times, parameters) {
sir_model <- function (times, states, parameters) {
with(as.list(c(states, parameters)), {
dSdt <- -beta*S*I
dIdt <- beta*S*I-gamma*I
dRdt <- gamma*I
dNdt <- dSdt + dIdt + dRdt
return(list(c(dSdt, dIdt, dRdt, dNdt)))
})
}
states <- c(S = 99, I = 1, R = 0, N = 100)
return(ode(y = states, times = times, func = sir_model, parms = parameters, method = "iteration"))
}
require(deSolve)
output <- as.data.frame(solve_sir_model(times = 1, parameters = c(beta = 400, gamma = 28)))
Error in iteration(y, times, func, parms, ...) :
times should be equally spaced In addition: Warning messages:
1: In min(x) : no non-missing arguments to min; returning Inf
2: In max(x) : no non-missing arguments to max; returning -Inf
R脚本错误。库中的错误(ggplot2):没有包 叫'ggplot2'
ggplot2已在我的R环境中安装和加载。另外,我的R主目录在Power BI中设置,我已经创建了基本的R图,不需要额外的包来确认它是否正常工作。在R脚本编辑器中,我也尝试用library(ggplot2)
ggplot(dataset, aes(x=label, y=value)) +geom_bar(stat="identity")
替换library(ggplot2)
但到目前为止没有成功。任何提示你将不胜感激!此问题也已发布在Power BI community forum。