我正在尝试计算移动窗口的一些统计数据,并在动物园包中使用rollapply.我的问题是如何让rollapply将该函数应用于前面的n个观察值而不是当前观察值和前面的n-1个观察值,因为右对齐似乎可以.
require(zoo)
z <- data.frame(x1=11:111, x2=111:211, x3=as.Date(31:131))#generate data
output<-data.frame(dates=z$x3,
rollapply(z[,1:2],by.column=TRUE, 5, max, fill=NA, align='right'))
Run Code Online (Sandbox Code Playgroud)
我有一个预感,这是由回答?rollapply"如果width是一个普通的数字向量,它的元素被认为是与align一起解释的宽度,而如果width是一个列表,它的组件被视为偏移.在上面的例子中,如果宽度为1,然后宽度为每个第s点再循环.如果width是列表,则其组件表示整数偏移,使得列表的第i个分量引用位置i + width [[i]]的时间点".但是我不知道R代码意味着什么,没有提供任何例子.
我试图在R中构建一个大的(~200 MM线)数据帧.数据帧中的每个条目将包含大约10个数字(例如1234.12345).代码设计用于遍历列表,从[i]之后的每个项目中减去位置[i]中的项目,而不是[i]之前的项目(如果我将输出放入矩阵中,它将是三角矩阵) ).代码很简单,在较小的列表上工作正常,但我想知道是否有更快或更有效的方法来做到这一点?我假设答案的第一部分将涉及"不要使用嵌套for循环",但我不确定替代方案是什么.
这个想法是,这将成为社交网络分析图的"边缘列表".一旦我有'outlist',我将根据一些标准(<,>,==,)减少边数,因此最终列表(和图形)将不会那么重要.
#Fake data of same approximate dimensions as real data
dlist<-sample(1:20,20, replace=FALSE)
#purge the output list before running the loop
rm(outlist)
outlist<-data.frame()
for(i in 1:(length(dlist)-1)){
for(j in (i+1):length(dlist)){
outlist<-rbind(outlist, c(dlist[i],dlist[j], dlist[j]-dlist[i]))
}
}
Run Code Online (Sandbox Code Playgroud) 是否可以将R图中的希腊字母斜体化?理想情况下,以下代码将导致斜体希腊字母:
plot(1:10, 1:10, type="n")
text(8,4, expression(italic(gamma)~":"~italic(sigma))) #doesn't work...
text(2,2,expression(italic("this")~":"~italic("that")))
Run Code Online (Sandbox Code Playgroud)
plotmath文档非常清楚地指出,italic()不适用于希腊字母,但是,他们确实说带有\ uxxxxx或\ Uxxxxxxxx的UTF-8可以用于创建斜体希腊符号,但是我无法获得此符号去工作。是否有人对如何使用utf或其他方式提出建议?
可能有一些Tex解决方案,但是我没有成功获取基本的Tex示例在我的系统上工作。我对他们开放,但我可能会问一些后续问题。
下面的代码几乎可以显示出我想要的内容,但并不完全。
windows(family='serif') #name for Times in default windows gr device lib
plot(1:10, 1:10, type="n")
text(5,9, expression(italic(?)~":"~italic(?))) #1
text(5,7, paste("\u03B2",":","\u03B1",sep=" "), font=3) #2
text(5,5, expression(italic(beta)~":"~italic(alpha))) #3
text(5,3, expression(italic("\u03B2")~":"~italic("\u03B1"))) #4
text(5,1.5, expression(italic("\u03B2")~plain(":")~italic("\u03B1"))) #5
Run Code Online (Sandbox Code Playgroud)
我需要斜体符号和非斜体“:”。在顶部(#1)中,斜体符号看起来很奇怪。在第二个中,斜体符号看起来正确,但是“:”是斜体。是的,期刊编辑已经抓住了这一点。
操作系统:Windows 7 x64