小编Hed*_*hog的帖子

" 写入R扩展 "手册提供了有关何时使用导入或取决的以下指导:

一般规则是

• 包,其名称空间仅需要加载使用库(PKGNAME)包必须在"进口"字段中列出,而不是在"Depends中"字段.
• 需要附加以使用库(pkgname)成功加载包的包必须仅在"取决于"字段中列出.

有人可以提供一点清晰度吗？我如何知道我的软件包何时只需要加载名称空间,何时需要附加软件包？两者的例子是什么？我认为典型的包只是一组函数,有时会调用其他包中的函数(其中一些工作已被编码).这个场景是1还是2？

编辑

我写了一篇博文,其中有关于这一特定主题的部分(搜索"Imports v Depends").视觉效果使其更容易理解.

如何获取与.gitignore文件中的规则匹配但过去已暂存或提交的文件的列表？

Gem.bin_path('cucumber', 'cucumber')

将返回二进制/可执行文件的路径.似乎没有这样的函数来返回库路径.在这种情况下,理想情况下会返回:

/home/hedge/.rvm/gems/ruby-1.9.2-p136@bbb-bdd-meta-bdd/gems/cucumber-0.10.0/lib

我错过了什么或者是否有一种简单/一种方法来获取这些信息？

更新:请不要CLI或非stdlib建议.

当使用broom我用结合dplyr::group_by,并dplyr::do进行分组数据由于上行动@drob.例如,根据齿轮系统将线性模型拟合到汽车:

library("dplyr")
library("tidyr")
library("broom")

# using do()
mtcars %>%
  group_by(am) %>%
  do(tidy(lm(mpg ~ wt, data = .)))

# Source: local data frame [4 x 6]
# Groups: am [2]

#     am        term  estimate std.error statistic      p.value
#   (dbl)       (chr)     (dbl)     (dbl)     (dbl)        (dbl)
# 1     0 (Intercept) 31.416055 2.9467213 10.661360 6.007748e-09
# 2     0          wt -3.785908 0.7665567 -4.938848 1.245595e-04
# 3     1 (Intercept) 46.294478 3.1198212 14.838824 1.276849e-08
# 4     1          wt -9.084268 1.2565727 -7.229401 …

我看到特拉维斯具有加密文件,工作流在这里.

我的用例稍微简单一些,我只想为Travis-CI上构建的文件生成签名.说:

hello-0.0.1-a.bin.asc
hello-0.0.1-a.bin
pubkey.gpg 
<or> hello-0.0.1-a.pub

在这种情况下hello-0.0.1-a.bin,由Travis构建创建,并将作为发布推送到Github.同样,签名也必须作为版本推送到Github(即在同一标签下).

如果私有/公共密钥对对于该构建是唯一的,我不会非常关心(即不是交易破坏者).但如果私有/公共密钥对在构建之间共享,那将是理想的.

欣赏并提示提示或咒语.

我使用以下示例数据和代码

# Example
x1<- as.Date("2013-12-31")
adddate1 <- 1:60
dts <- x1 + adddate1

df <- data.frame(a=runif(100),b=runif(100),c=runif(100) ,d=rnorm(2700), dates=dts)
df$Metric <- ifelse(df$a > 0.5,"a", "b")

df$Methodology <- ifelse(df$a > 0.5,"One", "Two")
df$Methodology <- factor(df$Methodology)

pl<-df %>%
  group_by(Methodology) %>%
  do(
    plots = ggplot(data=., aes(x = dates, y = b)) +
              geom_point() +
              stat_smooth(method="auto",size=1.5) +
              stat_summary(fun.data=median_hilow, fun.args=(conf.int=1)) + # Show IQR
              scale_x_date(date_breaks = "1 week", date_labels =  "%d-%b-%y") +
              facet_wrap(~Metric, scales="free") +
              ggtitle(unique(.$Methodology)) 
    )
pl[[1,2]]

我看到的输出是:

但是,我希望看到IQR,如通过stat_summary一些此类例程计算的,显示为带状图,以及显示中值的线.

我怀疑我必须编写用户定义的函数并使用它.

感谢任何提示或提示.

一段时间后我回到了R,以下让我难过:

我想在facor级别列表中建立一个位置因子值列表.例:

> data = c("a", "b", "a","a","c")
> fdata = factor(data)
> fdata
[1] a b a a c
Levels: a b c
> fdata$lvl_idx <- ????

这样:

> fdata$lvl_idx
[1] 1 2 1 1 3

感谢任何提示或提示.

在这种情况下,如何坚持DRY(手风琴的数量可能很大):

$ ->
  $("#accordion-1").accordion
    autoHeight: false
    navigation: true
$ ->
  $("#accordion-2").accordion
    autoHeight: false
    navigation: true

鉴于示例数据,我想要spread一key-value对子集.在这种情况下,它只是一对.然而,在其他情况下,子集spread是多于一对.

library(tidyr)
# dummy data
> df1 <- data.frame(e = c(1, 1, 1, 1),
              n = c("a", "b", "c", "d") ,
              s = c(1, 2, 5, 7))
> df1
  e n s
1 1 a 1
2 1 b 2
3 1 c 5
4 1 d 7

所有键值对的经典传播:

> df1 %>% spread(n,s)

  e a b c d
1 1 1 2 5 7

期望的输出,仅传播 n=c

  e c n s
1 1 5 a …

是否有任何R项目包可以促进异步网络IO？我在这里按照Ruby的Eventmachine或Python的Twisted来思考.如果有几个这样的软件包/库是最好的: - 性能 - 功能

我希望能够在不是r 包的项目中使用testthat和。实际上不使用任何第三方服务。只是一个普通的-old-r 源文件的集合covr