I get Error: invalid version specification ‘0,2’ when I use the function dm_draw() in r
I get Error: invalid version specification ‘0,2’ when I use the function dm_draw() in r
我想使用函数 dm_draw() 来可视化 dm object but when I ran the command I get the error message " Error: invalid version specification ‘0,2’". I've tried the code included in the vignette "Visualizing dm objects" (https://cran.r-project.org/web/packages/dm/vignettes/tech-dm-draw.html),当我 运行 使用 dm_draw() 函数时,我得到了相同的错误消息.
library(dm)
library(dplyr)
flights_dm_w_many_keys <- dm_nycflights13(color = FALSE)
dm_draw(flights_dm_w_many_keys)
我使用的是 dm 版本 0.2.7 和 DiagrammeR 1.0.8。 R 版本 4.1.2
我正在寻找可视化 dm 对象的解决方案,它也可能不同于 dm_draw()。
我希望有人可以帮助我完成这项工作。抱歉我的英语不好,感谢您的宝贵时间,我们将不胜感激任何类型的帮助。
您可以使用此代码:
library(dm)
library(dplyr)
library(DiagrammeR)
library(DiagrammeRsvg)
# Use this function
dm_draw_svg = function(dm,...) {
if (!requireNamespace("DiagrammeRsvg", quietly = TRUE)) {
stop(
"Package \"DiagrammeRsvg\" must be installed to use this function.",
call. = FALSE
)
}
dm::dm_draw(dm = dm, ...) %>%
DiagrammeRsvg::export_svg() %>%
htmltools::HTML() %>%
htmltools::html_print()
}
flights_dm_w_many_keys <- dm_nycflights13(color = FALSE)
# plot
dm_draw_svg(flights_dm_w_many_keys)
输出:
我想使用函数 dm_draw() 来可视化 dm object but when I ran the command I get the error message " Error: invalid version specification ‘0,2’". I've tried the code included in the vignette "Visualizing dm objects" (https://cran.r-project.org/web/packages/dm/vignettes/tech-dm-draw.html),当我 运行 使用 dm_draw() 函数时,我得到了相同的错误消息.
library(dm)
library(dplyr)
flights_dm_w_many_keys <- dm_nycflights13(color = FALSE)
dm_draw(flights_dm_w_many_keys)
我使用的是 dm 版本 0.2.7 和 DiagrammeR 1.0.8。 R 版本 4.1.2
我正在寻找可视化 dm 对象的解决方案,它也可能不同于 dm_draw()。 我希望有人可以帮助我完成这项工作。抱歉我的英语不好,感谢您的宝贵时间,我们将不胜感激任何类型的帮助。
您可以使用此代码:
library(dm)
library(dplyr)
library(DiagrammeR)
library(DiagrammeRsvg)
# Use this function
dm_draw_svg = function(dm,...) {
if (!requireNamespace("DiagrammeRsvg", quietly = TRUE)) {
stop(
"Package \"DiagrammeRsvg\" must be installed to use this function.",
call. = FALSE
)
}
dm::dm_draw(dm = dm, ...) %>%
DiagrammeRsvg::export_svg() %>%
htmltools::HTML() %>%
htmltools::html_print()
}
flights_dm_w_many_keys <- dm_nycflights13(color = FALSE)
# plot
dm_draw_svg(flights_dm_w_many_keys)
输出: