我知道filter()R 中的函数计算移动平均线.我想知道是否存在一个函数,它返回移动方差或标准偏差,以便在filter()函数输出中并排显示它.
我正在寻找一个函数,它返回一个向量的无序组合.例如
x<-c('red','blue','black')
uncomb(x)
[1]'red'
[2]'blue'
[3]'black'
[4]'red','blue'
[5]'blue','black'
[6]'red','black'
[7]'red','blue','black'
Run Code Online (Sandbox Code Playgroud)
我想在某个库中有一个函数可以执行此操作,但是找不到它.我正在尝试permutations,gtool但它不是我正在寻找的功能.
如何用R创建3D直方图?
例如,我有两个变量要计算它们落入定义的二维bin的次数.所以我在X和Y轴上有两个变量,而Z轴是两个变量的计数.
我有一个数据框data.在每一行都i分配了一个重量data$ww.现在,我想提出一个样品new_data的 data,按加权df$ww.我试过subset但很慢.
# sample data
data <- data.frame(var1 = log(sample(1:5000)))
ndata <- nrow(data)
maxW <- max(data$var1)
nsample <- 4000
rr <- runif(ndata)
data$ww <- cumsum(exp(data$var1))
new_data <- data[0, ]
i <- 1
while(nrow(new_data) < nsample) {
new_data[i, ] <- subset(data, data$ww > rr[i] * maxW)[1,]
i <- i + 1
}
Run Code Online (Sandbox Code Playgroud)
有更快的方法吗?
我想用R计算Hurst指数.是否有可以执行此操作的库或内置函数?任何建议将不胜感激(甚至参考的网站链接).感谢名单
更新:thanx到Ben Bolker的评论,我在函数的例子中找到了这个脚本
hurst.est(wspec, range, nvoice, plot=TRUE)
Run Code Online (Sandbox Code Playgroud)
在此页面http://finzi.psych.upenn.edu/R/library/Rwave/html/hurst.est.html
脚本:
wnoise <- rnorm(8192)
plot.ts(wnoise)
spwnoise <- fft(wnoise)
spwnoise <- Mod(spwnoise)
spwnoise <- spwnoise*spwnoise
plot(spwnoise[1:4096], log="xy", type="l")
lswnoise <- lsfit(log10(1:4096), log10(spwnoise[1:4096]))
abline(lswnoise$coef)
cwtwnoise <- DOG(wnoise, 10, 5, 1, plot=FALSE)
mcwtwnoise <- Mod(cwtwnoise)
mcwtwnoise <- mcwtwnoise*mcwtwnoise
wspwnoise <- tfmean(mcwtwnoise, plot=FALSE)
wspec.pl(wspwnoise, 5)
hurst.est(wspwnoise, 1:50, 5)
Run Code Online (Sandbox Code Playgroud)
我猜第一部分会产生一个具有记忆效应的信号,但是我无法理解第二部分代码的一部分对于扩展赫斯特指数是非常必要的.谁能帮助我并解释一下?我对此表示怀疑
mcwtwnoise <- Mod(cwtwnoise)
mcwtwnoise <- mcwtwnoise*mcwtwnoise
Run Code Online (Sandbox Code Playgroud) 我有这种类型的数据框
string1,string2,value1
string3,string1,value2
string3,string5,value3
...
...
Run Code Online (Sandbox Code Playgroud)
我会用独特的整数转换srings:
1,2,value1
3,1,value2
3,5,value3
...
...
Run Code Online (Sandbox Code Playgroud)
我正在尝试使用c()运算符,将字符串转换为唯一的整数.问题是如何管理数据框的两列.我怎样才能做到这一点?
我用magnificpopup脚本嵌入了一个视频.我无法在嵌入的youtbe复制结束时删除相关视频.
这是我尝试过的代码:
<a class="popup-youtube" href="https://www.youtube.com/watch?rel=0&feature=player_detailpage&v=83UHRghhars">
Run Code Online (Sandbox Code Playgroud)
但不起作用.以下代码也不重现视频
<a class="popup-youtube" href="https://www.youtube.com/watch?feature=player_detailpage&v=83UHRghhars&rel=0">
Run Code Online (Sandbox Code Playgroud)
如果我把youtube告诉我的嵌入代码:
//www.youtube.com/embed/83UHRghhars?rel=0
Run Code Online (Sandbox Code Playgroud)
视频不起作用.我做错了什么?
我想将 xml 文件转换为 html 文件。我可以在哪里找到在 shell 脚本中执行此操作的分步教程(适用于 Linux),或者需要遵循哪些步骤。抱歉问了这个非常基本的问题,但我在这方面绝对是初学者。谢谢
我试图在我的mongo db中查询python2.7中的项目
output = collection.find_one({ $and : [{'name' : data['name']},{'phone_1' : data['phone_1']}]})
Run Code Online (Sandbox Code Playgroud)
当我尝试运行脚本python告诉我
File "./test.py", line 113
output = collection.find_one({ $and : [{'name' : data['name']},{'phone_1' : data['phone_1']}]})
^
SyntaxError: invalid syntax
Run Code Online (Sandbox Code Playgroud)
我检查了手册和mongo的版本.我已经安装了mongodb 2.0.6,所以上面的语法应该没问题.我错过了什么吗?
我试图用相同的字符和引号替换行中的最后一个字符 '
这是sed代码
sed "s/\([A-Za-z]\)$/\1'/g" file1.txt > file2.txt
Run Code Online (Sandbox Code Playgroud)
但不起作用.错误在哪里?
r ×6
combinations ×1
histogram ×1
html ×1
linux ×1
mongodb ×1
pymongo ×1
python ×1
python-2.7 ×1
sed ×1
shell ×1
time-series ×1
xml ×1
youtube ×1