小编Sac*_*amp的帖子

如何正确使用R包中其他包的功能

我对此有点困惑.我有一个R包,它有一个小函数(不是包的mayor部分),其中调用包的principal功能psych.如何在DESCRIPTION和NAMESPACE中正确指定?

Depends: psychDESCRIPTION中的设置确保每次加载包时都加载mental包.这有效,但对于我的包的这么小部分来说似乎是多余的.

设置Suggests: psych和输入require("psych")函数就是我现在所做的,但是如果psych没有安装就行不通,这似乎是错误的做法(编写R扩展表示建议主要用于示例).

我想我需要导入这个功能.我尝试Imports: psych在DESCRIPTION和importFrom(psych,"principal")NAMESPACE中进行设置.这是有效的,但在没有安装精神的计算机上,它在加载我的包时会出错.

namespaces r package

22
推荐指数
1
解决办法
2481
查看次数

R中的文件浏览器

我需要为那些从未使用R的人编写一个小R脚本,然后导入文件并使用它做一些事情.我想尽可能地减少用户输入,并且因为分配文件路径基本上是我想知道的所有用户输入,是否有可能得到一个弹出屏幕(基本上你通常的"打开文件"屏幕)允许某人选择一个文件(将名称作为字符串导入R或其他东西)?

r file

19
推荐指数
1
解决办法
2万
查看次数

ggplot2中每个面的不同轴限制

我试图ggplot2在y轴显示标签的位置制作切面图,x轴应显示两个不同尺度(在不同尺度上)的每个标签的值的折线图.到目前为止我有这个:

Data <- structure(list(label = structure(
  c(1L, 1L, 2L, 2L, 3L, 3L, 4L, 
  4L, 5L, 5L, 6L, 6L), .Label = c("A", "B", "C", "D", "E", "F"), class = "factor"), 
  facet = structure(c(1L, 2L, 1L, 2L, 1L, 2L, 1L, 2L, 1L, 2L, 
  1L, 2L), .Label = c("A", "B"), class = "factor"), value = c(0.0108889081049711, 
  0.37984336540103, 0.0232500876998529, 0.777756493305787, 
  0.0552913920022547, 0.920194681268185, 0.0370863009011373, 
  0.114463779143989, 0.00536034172400832, 0.469208759721369, 
  0.0412159096915275, 0.587875489378348), group = c(1, 1, 1, 
  1, 1, 1, 1, 1, 1, 1, 1, 1)), …
Run Code Online (Sandbox Code Playgroud)

r ggplot2

14
推荐指数
1
解决办法
8488
查看次数

在.emacs中获取没有扩展名的缓冲区文件名

我正在尝试为便携式emacs链接到便携式LaTeX编译器和R for Sweave创建快捷方式,但我对使用的语言知之甚少.emacs(这是Lisp?)

目前我使用fullpath-relative-to-current-filehttp://xahlee.org/emacs/elisp_relative_path.html获取的路径.emacs(USBDRIVE/Documents获取),然后获取编译器的相对路径并调用它,buffer-file-name其中包括完整路径和文件名,包括扩展名的扩展名:

(global-set-key (kbd "C-c s")
        (lambda ()
          (interactive)
            (cond ((string-equal (file-name-extension (buffer-file-name)) "tex") 
                (shell-command (concat (fullpath-relative-to-current-file "../PortableApps/miktex/miktex/bin/pdflatex ") buffer-file-name)))
            )
            (cond ((string-equal (file-name-extension (buffer-file-name)) "Rnw") 
                (shell-command (concat (fullpath-relative-to-current-file "../PortableApps/R/R-2.14.1/bin/R CMD Sweave ") buffer-file-name " --pdf")))
            )
        )
)   
Run Code Online (Sandbox Code Playgroud)

这允许我用来C-c stex文件和SweaveRnw文件上运行LaTeX .现在我想包括对bibtex的调用,但为此我需要文件的文件名和路径,tex没有扩展名.我怎样才能做到这一点?

lisp emacs elisp

12
推荐指数
1
解决办法
3163
查看次数

ggplot2中有多个直方图

这是我的数据的一小部分:

dat <-structure(list(sex = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L), .Label = c("male", 
"female"), class = "factor"), A = c(1, 2, 0, 2, 1, 2, 2, 0, 2, 
0, 1, 2, 2, 0, 0, 2, 0, 0, 0, 2), B = c(0, 0, 0, 0, 0, 2, 0, 
0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0), C = c(1, 2, 1, …
Run Code Online (Sandbox Code Playgroud)

r histogram ggplot2

11
推荐指数
1
解决办法
2万
查看次数

R CMD Sweave究竟做了什么-pdf呢?

我在R 2.14的变化中注意到了这一点:

R CMD Sweave现在有一个--pdf选项来生成已处理的Sweave文档的PDF版本.

尝试一下,我注意到它不仅在生成的tex上运行了pdfLaTeX,而且还正确地包含了bibTeX引用并在之后进行了清理.现在似乎是一种非常好的使用Sweave的方式(更不用说现在在编辑器中实现整个例程是多么容易).

但到底这究竟是什么呢?我找不到更多细节.看来Sweave - > pdflatex - > bibtex - > pdflatex - > pdflatex至少?

r sweave

10
推荐指数
1
解决办法
1341
查看次数

打开RStudio项目时自动运行R代码

我写了一个R函数,在另一个问题中更新了包的版本号.我使用GitHub和RStudio工作很多,如果每次打开某个项目时这个函数都自动运行(或者更好的是,做一个git commit/push,那么它会让我安全一段时间(再加上更精确))我认为这很难做到).但我不知道该怎么做或者甚至可能.

.Rprofile每次启动时都可以用来运行R代码R,所以我可以在每次启动R时更新版本(或者只是在日期不是今天或者其他东西的情况下只更新版本),但这似乎过度了.

r rstudio

9
推荐指数
1
解决办法
3431
查看次数

在ggplot2中用年份注释第一个月

假设我有这样的情节:

DF <- data.frame(date=Sys.Date() - (-100):100, y=rnorm(201))
library("ggplot2")
library(scales)
ggplot(DF, aes(x=date, y=y)) +
 geom_point() +
 scale_x_date(breaks = "1 month", minor_breaks = "1 week", labels=date_format("%b"))
Run Code Online (Sandbox Code Playgroud)

在这里,我想在每个月包括主要行和标签,每周包括次要行.这样做效果很好,但现在我想将缩写月份的年份包括在内,但仅限于该年度的第一个月.因此,标签应该阅读sep 2014. okt,nov,dec,jan 2015,feb,mrt ....

这可能吗?

r ggplot2

9
推荐指数
1
解决办法
2348
查看次数

使用现有R会话中的对象运行Sweave或knitr

假设x我当前会话中有一个对象:

x <- 1
Run Code Online (Sandbox Code Playgroud)

如何在Sweave或knitr文档中使用此对象,而无需明确指定它:

\documentclass{article}
\begin{document}
<<>>=
  print(x)
@
\end{document}
Run Code Online (Sandbox Code Playgroud)

我问的原因是因为我想写一个R脚本导入数据,然后使用Sweave模板为每个主题生成一个报告.

r sweave knitr

8
推荐指数
3
解决办法
5474
查看次数

在Rcpp中采样随机整数

这可能是一个非常简单的问题,但我无法真正找到它.如何在Rcpp中采样1到N之间的随机整数?我知道我可以对一个统一的数字进行采样并对其进行舍入,或者包含sample在C++代码中使用的函数,但两者似乎都不是正确的方法.

r rcpp

8
推荐指数
1
解决办法
2111
查看次数

标签 统计

r ×9

ggplot2 ×3

sweave ×2

elisp ×1

emacs ×1

file ×1

histogram ×1

knitr ×1

lisp ×1

namespaces ×1

package ×1

rcpp ×1

rstudio ×1