小编Kru*_*rug的帖子

此代码从此处下载http://www.bls.gov/schedule/news_release/2015_sched.htm每个包含"发布"列下的"就业情况"的日期.

pg <- read_html("http://www.bls.gov/schedule/news_release/2015_sched.htm")

# target only the <td> elements under the bodytext div
body <- html_nodes(pg, "div#bodytext")

# we use this new set of nodes and a relative XPath to get the initial <td> elements, then get their siblings
es_nodes <- html_nodes(body, xpath=".//td[contains(., 'Employment Situation for')]/../td[1]")

# clean up the cruft and make our dates!
nfpdates2015 <- as.Date(trimws(html_text(es_nodes)), format="%A, %B %d, %Y")

###thanks @hrbrmstr for this###

我想重复其他包含其他年份的URL,以相同的方式命名,只更改年份数.特别是,对于以下URL:

#From 2008 to 2015
http://www.bls.gov/schedule/news_release/2015_sched.htm
http://www.bls.gov/schedule/news_release/2014_sched.htm
...
http://www.bls.gov/schedule/news_release/2008_sched.htm

我的知识rvest …

我有一个20x2的数据帧.我将该数据帧转换为data.table以执行某些操作(删除了对操作和目标的解释超出范围).转换允许我避免使用for循环.但转换产生了一些问题.

我需要将df data.table转换回data.frame.我怎样才能做到这一点？

非常感谢您的帮助.

df <- data.frame(LastPrice = c( 1221, 1220, 1220, 1217, 1216,  1218 , 1216, 1216, 1217, 1220, 1219, 1218, 1220, 1216, 1217, 1218, 1218, 1207, 1206, 1205), KCT = c( 1218, 1218, 1219, 1218, 1221,  1217 , 1217, 1216, 1219, 1216, 1217, 1216, 1219, 1217, 1218, 1217, 1217, 1217, 1219, 1217))

library(data.table)
setDT(df)
df[, check := as.integer(LastPrice > KCT)]
df[, Signal := do.call(pmin, shift(check, 0:2, type="lead"))]

我在Quantstrat文档中找不到add.rule参数的定义.我很想知道orderqty,tradeSize和maxSize之间的区别.

在quantstrattrader上找到以下相关资料:

该orderqty参数仅在没有osFUN指定时适用.它可以采用平坦值(EG 1,2),或者,当规则类型为"退出"时,采用"全部"数量来平展位置.

在osFUN指定要使用的订单尺寸功能.该osFUN参数实际上是一个作为参数传入的函数对象.如果您不想使用osFUN,只需使用固定数量,例如100,或者如果使用退出类型订单,请使用"全部"展平仓位.

这是一个add.rule函数的样子:

 add.rule(strategy.st, name = "ruleSignal",\n          arguments = list(sigcol = "longsig",\n                           sigval = TRUE,               \n                           ordertype = "market",\n                           prefer = "Open",            \n                           orderside = "long",\n                           orderqty = 100,\n                           replace = FALSE,            \n                           osFUN = osMaxPos,\n                           tradeSize = 100,\n                           maxSize = 100),\n          type = "enter")\n

谢谢.

我找不到这个基本问题的答案.我只想重命名矩阵的一个特定行.使用数据框架很容易,如何使用矩阵完成？当然,可以来回转换,而不是重点.

这次来到表面,而试图建立的函数的输出quantile,并mean成一个矩阵.

DF <- structure(list(FwdD1 = c(2.2, 2.8, 0.7, 1.1, -0.9, 2.5), FwdD2 = c(2.6,2.2, 2, -1.4, 2.8, 4), FwdD3 = c(1.2, 1.7, 9, -1.6, 1.7, 1.1),FwdD4 = c(1.6, 1.9, 5.4, 1.2, 1.4, 0.8), FwdD5 = c(4.7, 3,4.8, -1.2, 0, 0.2)), .Names = c("FwdD1", "FwdD2", "FwdD3","FwdD4", "FwdD5"), row.names = c("10007", "57926", "95462", "142373","181339", "229476"), class = "data.frame")

Quantiles <- round(apply(DF, 2, quantile, na.rm=TRUE),2)
Mean <- round(apply(DF, 2, mean, na.rm=TRUE),2)
Mean <- as.matrix(Mean,drop=FALSE)
QuantilesMean <- rbind(Quantiles,t(Mean))
rownames(QuantilesMean) …

如何使 R 图中的网格线plot不超出图的边界？即需要定义网格线的起点和终点。

在给出的示例中，我希望 绘制的网格线grid和 绘制的 y=7.5 处的网格线abline从 y 轴延伸到框的右边缘。

plot(1:10,1:10,type = "n")
abline(h = 7.5, v = 0, col = "gray60", lty = 3)
grid(10,10)

我有100x2数据帧DFN.fitdist在DFN $ Lret列上运行会出现错误消息"函数mle无法估计参数,错误代码为100".我想是原因是最后一行包含一个NA.因此我运行fitdist排除NAs,现在我得到错误"数据必须是长度大于1的数字向量".有关如何解决此问题的任何想法？非常感谢.

DFN <- structure(list(LRet = c(0.0011, 0, -0.0026, 0, -0.0015, 0.0038, 3e-04, -0.0021, 4e-04, -0.001, 0, 0.0019, -6e-04, -8e-04, -5e-04, -8e-04, 3e-04, -5e-04, -0.0026, 0.0014, 7e-04, 0, -2e-04, 0.0011, -0.0025, 0.0042, 0.0022, -0.0017, -0.0058, 1e-04, 2e-04, 8e-04, -9e-04, -0.0014, -0.0014, -0.001, -0.0032, -0.0015, 6e-04, -8e-04, 0.001, -0.0014, -0.0017, -8e-04, -0.001, 0.0011, 0.0013, -0.001, 5e-04, 9e-04, -8e-04, -0.0025, 0.0027, 6e-04, 2e-04, -6e-04, 9e-04, -3e-04, -7e-04, 3e-04, 0, 2e-04, -6e-04, 1e-04, -1e-04, -7e-04, -8e-04, 7e-04, -1e-04, …

尝试使用fread从data.table包中导入 csv 。需要跳过前两行。第一行有乱码。第二行有标题。下面的read.csv代码做我需要的：

data <- read.csv(file="C:/1.csv", skip=1, header=TRUE) 

我想知道如何实现与fread. 谢谢你。