我需要从透明背景输出从R到PNG文件的ggplot2图形.基本的R图形一切都很好,但ggplot2没有透明度:
d <- rnorm(100) #generating random data
#this returns transparent png
png('tr_tst1.png',width=300,height=300,units="px",bg = "transparent")
boxplot(d)
dev.off()
df <- data.frame(y=d,x=1)
p <- ggplot(df) + stat_boxplot(aes(x = x,y=y))
p <- p + opts(
panel.background = theme_rect(fill = "transparent",colour = NA), # or theme_blank()
panel.grid.minor = theme_blank(),
panel.grid.major = theme_blank()
)
#returns white background
png('tr_tst2.png',width=300,height=300,units="px",bg = "transparent")
p
dev.off()
Run Code Online (Sandbox Code Playgroud)
有没有办法用ggplot2获得透明背景?
我使用Google C++ Testing Framework进行代码的单元测试.我使用Eclipse CDT和C++单元测试模块进行输出分析.
以前我用CppUnit它有宏家族 CPPUNIT*_MESSAGE,可以像这样调用:
CPPUNIT_ASSERT_EQUAL_MESSAGE("message",EXPECTED_VALUE,ACTUAL_VALUE)
Run Code Online (Sandbox Code Playgroud)
并允许发送自定义消息以测试输出.
有没有办法在谷歌测试输出中包含一些自定义文本?
(最好是包含使用谷歌测试自动单元测试的现有程序读取的数据消息的方式.)
如何在Windows(7)的R(统计语言)中使用MySQL?
使用linux时没有问题:
install.packages('RMySQL')
library(RMySQL)
...
Run Code Online (Sandbox Code Playgroud)
但我在CRAN上找不到适用于Windows的此类软件包.关于这个事实只有注意事项.我找到了2.10版本的软件包,但它在2.12.1中不可用.
也试过了
install.packages("RMySQL", type="source")
Run Code Online (Sandbox Code Playgroud)
但得到一个错误:
* installing *source* package 'RMySQL' ...
ERROR: configuration failed for package 'RMySQL'
* removing 'C:/.../R/win-library/2.12/RMySQL'
Run Code Online (Sandbox Code Playgroud)
有没有办法从Windows中的R连接到MySQL数据库?
我想将背景网格添加到绘图的中心,然后隐藏标准网格线.网格的角点存储在pts数据框中,我尝试使用geom_tile,但它似乎没有使用指定的点.在此先感谢您的帮助.
library(ggplot2)
pts <- data.frame(
x=c(170,170,170,177.5,177.5,177.5,185,185,185),
y=c(-35,-25,-15,-35,-25,-15,-35,-25,-15))
ggplot(quakes, aes(long, lat)) +
geom_point(shape = 1) +
geom_tile(data=pts,aes(x=x,y=y),fill="transparent",colour="black") +
opts(
panel.grid.major=theme_blank(),
panel.grid.minor=theme_blank()
)
Run Code Online (Sandbox Code Playgroud) 我有几个连接到AngelScript引擎的类.这个引擎使用有趣的方式来分配对象:它分配所需的内存量(可能有malloc()
),当作者建议使用这样的结构在这个内存中创建对象时:
static void Constructor(ObjectType *thisPointer)
{
new(thisPointer) ObjectType();
}
Run Code Online (Sandbox Code Playgroud)
和这样的代码来销毁对象:
static void Destructor(ObjectType *thisPointer)
{
thisPointer->~ObjectType();
}
Run Code Online (Sandbox Code Playgroud)
我有几个问题:
free()
)delete(thisPointer)
(或类似的东西)而不是这种结构,它是否相同?(至少这段代码在编译和运行时没有错误)先感谢您.
我有一个编码组 ID 的变量:
d <- data.frame(group = c(0,1,0,2,1,3,2,0,1,2), x=c(1.2,2.3,3.2,2.1,1.3,1.5,2.3,0.4,1.3,1.7))
Run Code Online (Sandbox Code Playgroud)
当我尝试在 ggplot2 中使用它制作箱线图时出现错误
提供给离散尺度的连续值
尝试呈现数据。然后我手动将数据中的至少一个组 ID 更改为文本,一切正常。
所以,我的问题是:是否有一些简单的方法可以将包含有限数量的变量的连续变量更改为离散变量?
我有一个像这样的 MySQL 表
CREATE TABLE IF NOT EXISTS `vals` (
`DT` datetime NOT NULL,
`value` INT(11) NOT NULL,
PRIMARY KEY (`DT`)
);
Run Code Online (Sandbox Code Playgroud)
DT 是唯一的日期和时间
数据样本:
INSERT INTO `vals` (`DT`,`value`) VALUES
('2011-02-05 06:05:00', 300),
('2011-02-05 11:05:00', 250),
('2011-02-05 14:35:00', 145),
('2011-02-05 16:45:00', 100),
('2011-02-05 18:50:00', 125),
('2011-02-05 19:25:00', 100),
('2011-02-05 21:10:00', 125),
('2011-02-06 00:30:00', 150);
Run Code Online (Sandbox Code Playgroud)
我需要得到这样的东西:
start|end|value
NULL,'2011-02-05 06:05:00',300
'2011-02-05 06:05:00','2011-02-05 11:05:00',250
'2011-02-05 11:05:00','2011-02-05 14:35:00',145
'2011-02-05 14:35:00','2011-02-05 16:45:00',100
'2011-02-05 16:45:00','2011-02-05 18:50:00',125
'2011-02-05 18:50:00','2011-02-05 19:25:00',100
'2011-02-05 19:25:00','2011-02-05 21:10:00',125
'2011-02-05 21:10:00','2011-02-06 00:30:00',150
'2011-02-06 …
Run Code Online (Sandbox Code Playgroud)