C++ 使用R创建图形/绘图/图表,使用GTK显示并与之交互

C++ 使用R创建图形/绘图/图表,使用GTK显示并与之交互,c++,python,r,gtk,C++,Python,R,Gtk,我想使用R生成一些图形/绘图/图表,然后使用GTK显示它们。一个功能是绘图必须能够自动更新,并具有一些交互功能,如设置最大值/最小值标签、重新缩放、允许归一化等。。。数据集可能有几千个数据点,可能多达一万个 是否有任何库/模块已经这样做了?我的谷歌浏览器很弱。我不介意C++或Python。p> 如果没有这样的图书馆,我怎样才能做到这一点 注意:该系统是一种嵌入式系统——它当然没有互联网连接,但有一个内部网络。使用web会大幅增加系统的成本,因此它不是解决我问题的好办法。首先,R的核心不具有交互式

我想使用R生成一些图形/绘图/图表,然后使用GTK显示它们。一个功能是绘图必须能够自动更新,并具有一些交互功能,如设置最大值/最小值标签、重新缩放、允许归一化等。。。数据集可能有几千个数据点,可能多达一万个

是否有任何库/模块已经这样做了?我的谷歌浏览器很弱。我不介意C++或Python。p> 如果没有这样的图书馆,我怎样才能做到这一点


注意:该系统是一种嵌入式系统——它当然没有互联网连接,但有一个内部网络。使用web会大幅增加系统的成本,因此它不是解决我问题的好办法。

首先,R的核心不具有交互式绘图功能——这与用编程语言本身控制几乎所有东西的想法背道而驰

有一些库允许您创建或多或少的交互式绘图,从简单的
定位器
函数开始,您需要将其包装到R程序中,包括来自RStudio的包以及该包。甚至还有一个基于GTK+的R包,名为


根据您实际想要实现的目标,使用gnuplot可能是一个更好的主意。

首先,R的核心不具有交互式绘图功能——这与用编程语言本身控制几乎所有东西的想法背道而驰

有一些库允许您创建或多或少的交互式绘图,从简单的
定位器
函数开始,您需要将其包装到R程序中,包括来自RStudio的包以及该包。甚至还有一个基于GTK+的R包,名为


根据您实际想要实现的目标,使用gnuplot可能是一个更好的主意。

因为您也在标记中添加了python,可能会引起一些兴趣?以防万一。

因为您也将python放在了标记中,可能会引起一些兴趣?以防万一。

对于一个基于web的解决方案(web是未来:),它允许从服务器上实现这种功能,我想看看Rstudio的人员刚刚发布的闪亮的软件包。它看起来就像你需要的,你不必做任何程序。你还可以从任何地方打开浏览器。请参阅此lnks:

对于一个基于web的解决方案(web是未来:),它允许从服务器上实现这种功能,我想看看Rstudio的人员刚刚发布的闪亮的软件包。它看起来就像你需要的,你不必做任何程序。你还可以从任何地方打开浏览器。请参阅此lnks:


我想知道这些图形设备是否会出现10000点的问题,而这个
gWidgets
脚本在
RGtk2
Qt
下运行,速度快到了可以接受的程度(当然在我老化的机器上100000点太多了):

库(gWidgets)
选项(guiToolkit=“RGtk2”)

w我想知道10000分是否会成为这些图形设备的问题,而这个
gWidgets
脚本在
RGtk2
Qt
下运行,速度快到可以接受的程度(当然,在我老化的机器上100000分太多了):

库(gWidgets)
选项(guiToolkit=“RGtk2”)

是的,我确实也在看。谢谢。是的,我也在看。谢谢。你的问题没有说明这个限制,在嵌入式平台上有没有足够快的gui?这个系统有点嵌入式——它当然没有互联网连接,但有一个内部网络。使用网络会大大增加系统的成本,因此这不是解决我问题的好办法。但是,我没有在问题中详细说明这一点,所以你的答案很好,但遗憾的是,对我的用例没有用处。没问题,但是这些约束非常重要,所以最好在任何其他问题中添加它们。您还可以编辑您的问题以包含附加约束。您的问题没有指定此约束,在嵌入式平台上是否有足够快的gui?系统是嵌入式的,它当然没有Internet连接,但有内部网络。使用网络会大大增加系统的成本,因此这不是解决我问题的好办法。但是,我没有在问题中详细说明这一点,所以你的答案很好,但遗憾的是,对我的用例没有用处。没问题,但是这些约束非常重要,所以最好在任何其他问题中添加它们。您还可以编辑您的问题以包含附加约束。您可能对
library(gWidgets)
options(guiToolkit="RGtk2")
w <- gwindow("test")
pg <- gpanedgroup(cont=w)
fl <- glayout(cont=pg)
gg <- ggraphics(cont=pg)
size(gg) <- c(600, 600)

fl[1,1] <- "No. points"
fl[1,2] <- no_pts <- gedit("10", cont=fl, coerce.with=as.numeric)
fl[2,2] <- gbutton("click me", cont=fl, label="", handler=function(h,...) {
  n <- svalue(no_pts)
  plot(rnorm(n), rnorm(n))
})