假设我有一个如下功能:
ff <- function(x) {
cat(x, "\n")
x^2}
并运行它:
y <- ff(5)
# 5
y
# [1] 25
我的问题是如何禁用或隐藏5打印的cat(x, "\n")如下:
y <- ff(5)
y
# [1] 25
假设我有一个数据帧,以便:
df<-data.frame(id=1:8,group=c(1,0,0,1,1,0,1,0),rep=c(rep("d1",4),rep("d2",4)),value=rbinom(8,1,0.6))
df
id group rep value
1 1 1 d1 0
2 2 0 d1 0
3 3 0 d1 0
4 4 1 d1 1
5 5 1 d2 1
6 6 0 d2 0
7 7 1 d2 1
8 8 0 d2 1
什么是获得累积总和的最佳方式,group以及rep:
cumsum
group d1 d1+d2 d1+d2+d3
0 0 1 ...
1 1 3 ...
我正在构建一个R包使用R CMD build ABC并收到此警告消息:
* building ‘milonga_1.0.tar.gz’
Warning: invalid uid value replaced by that for user 'nobody'
我不知道这意味着什么.有人会有简短的解释吗？
在尝试创建本地R包时,我列出了一些依赖包作为Depends:
...
Description: NA
License: GPL-2
Depends:R (>= 2.15.0),
survival,
PropCIs,
boot,
msm,
reshape2
LazyData: true
但我通过运行R CMD检查获得了这些消息:
*checking dependencies in R code ... NOTE
Packages in Depends field not imported from:
‘PropCIs’ ‘boot’ ‘msm’ ‘reshape2’ ‘survival’
These packages need to be imported from (in the NAMESPACE file)
for when this namespace is loaded but not attached.
然后我使用手动将这些包添加到NAMESPACE文件中,但它确实有效并且在检查后自动删除了导入行.
另一个奇怪的事情是检查过程显示:
R CMD check succeeded
但文件随后系统地/自动地消失或删除.
有人知道原因吗？
假设我有一个像这样的变量
c<-c("9/21/2011 0:00:00", "9/25/2011 0:00:00", "10/2/2011 0:00:00",
"9/28/2011 0:00:00", "9/27/2011 0:00:00")
什么是快速删除所有0:00:00s的方法
c
[1] "9/21/2011" "9/25/2011" "10/2/2011" "9/28/2011" "9/27/2011"
我正在尝试在R文档中插入一个等式,以便:
\deqn{p_{x}(1)=Pr(y=1|x)}
但它确实如我所料,其中x是p的下标.
有人知道R文档中的原因或如何下标p？
假设我有两个数据框,例如:
set.seed(123)
df1<-data.frame(bmi=rnorm(20, 25, 5),
date1=sample(seq.Date(as.Date("2014-01-01"),
as.Date("2014-02-28"),by="day"), 20))
df2<-data.frame(epi=1:5,
date2=as.Date(c("2014-1-8", "2014-1-15", "2014-1-28",
"2014-2-05", "2014-2-24")))
我的问题是如何匹配bmi与epi其中DATE1最接近之前或在date2？像这样的结果:
epi date2 bmi date1
1 1 2014-01-08 33.58 2014-01-08
2 2 2014-01-15 22.64 2014-01-15
3 3 2014-01-28 22.22 2014-01-26
4 4 2014-02-05 15.17 2014-02-01
5 5 2014-02-24 27.49 2014-02-15
这是我的问题:
df1 <- data.frame(x = 1:5, y = 2:6, z = 3:7)
rownames(df1) <- LETTERS[1:5]
df1
x y z
A 1 2 3
B 2 3 4
C 3 4 5
D 4 5 6
E 5 6 7
df2 <- data.frame(x = 1:5, y = 2:6, z = 3:7)
rownames(df2) <- LETTERS[3:7]
df2
x y z
C 1 2 3
D 2 3 4
E 3 4 5
F 4 5 6
G 5 6 7
我想要的是:
x y …假设我有一个像这样的 data.frame：
set.seed(123)
df <- data.frame(a=rnorm(10, 0,1), b=rnorm(10,1,2), c=rnorm(10, 2, 1),
x=rnorm(10, 1,2), y=rnorm(10,2,3), z=rnorm(10, 3, 4))
# a b c x y z
#1 -0.56047565 3.44816359 0.9321763 1.8529284 -0.08412094 4.013274
#2 -0.23017749 1.71962765 1.7820251 0.4098570 1.37624817 2.885813
#3 1.55870831 1.80154290 0.9739956 2.7902513 -1.79618905 2.828518
#4 0.07050839 1.22136543 1.2711088 2.7562670 8.50686790 8.474409
#5 0.12928774 -0.11168227 1.3749607 2.6431622 5.62388599 2.096916
#6 1.71506499 4.57382627 0.3133067 2.3772805 -1.36932575 9.065882
#7 0.46091621 1.99570096 2.8377870 2.1078353 0.79134549 -3.195011
#8 -1.26506123 -2.93323431 2.1533731 0.8761766 0.60003394 5.338455 …如果我做:
file.path("", "a", "b", "c.txt")
[1] "/a/b/c.txt"
我得到了正确的文件路径,但如果我这样做:
cc<-c("", "a", "b", "c.txt")
file.path(cc)
[1] "" "a" "b" "c.txt"
这看起来不对.我想知道如何进行索引cc中file.path()？