小编lmo*_*lmo的帖子

阅读包含日期和数字的csv

我用R导入csv文件时遇到问题:

要导入的示例行:

2010-07-27;91
2010-07-26;93
2010-07-23;88
Run Code Online (Sandbox Code Playgroud)

我使用声明:

data <- read.csv2(file="...", sep=";", dec=".", header=FALSE)
Run Code Online (Sandbox Code Playgroud)

当我尝试将这些数据与使用统计分析产生的其他数据进行汇总时cbind,日期显示为整数,因为它是作为因子导入的.

如果我尝试将其显示为字符串使用as.character,则数字数据也会转换为字符,因此它们无法用于统计过程.

r read.csv

14
推荐指数
3
解决办法
6万
查看次数

R:安装rpanel时遇到问题

我试图安装的软件包rpaneltkrplotRStudio.下载并安装后,我收到此消息:

downloaded 686 Kb
* installing *source* package ‘rpanel’ ...
** package ‘rpanel’ successfully unpacked and MD5 sums checked
** R
** data
*** moving datasets to lazyload DB
** demo
** inst
** preparing package for lazy loading
Error in structure(.External(.C_dotTcl, ...), class = "tclObj") : 
  [tcl] can't find package BWidget.

Error : unable to load R code in package ‘rpanel’
ERROR: lazy loading failed for package ‘rpanel’
* removing ‘..../R/i686-pc-linux-gnu-library/3.0/rpanel’
Warning in …
Run Code Online (Sandbox Code Playgroud)

r package

14
推荐指数
2
解决办法
4041
查看次数

使用knitr kable函数对齐列

我执行一个简单的任务:创建一个表,并使用其输出R Markdownpdf如下:

library(knitr)
kable(datatable,align='ccccccc',
col.names = c("Copy","Sigma Est","Sigma Lower","Sigma Upper", 
"Lambda Est","Lambda Lower","Lambda Upper"),digits=3)
Run Code Online (Sandbox Code Playgroud)

问题

当我输出表格时,列不居中.实际上,对于某些表格,它们与其他表格正确对齐 - 左对齐,这对我来说似乎相当随机.

如何通过包中的R函数控制列的对齐,即我做错了什么?kableknitr

编辑

运行:

library(knitr)
kable(datatable,align=c(rep('c',times=7)),
col.names = c("Copy","Sigma Est","Sigma Lower","Sigma Upper", 
"Lambda Est","Lambda Lower","Lambda Upper"),digits=3)
Run Code Online (Sandbox Code Playgroud)

产量:

| Copy | Sigma Est | Sigma Lower | Sigma Upper | Lambda Est | Lambda Lower | Lambda Upper |
|:----:|:---------:|:-----------:|:-----------:|:----------:|:------------:|:------------:|
|  0   |  14.631   |   12.275    |   16.987    |   0.129    |    8.778     |    9.296     | …
Run Code Online (Sandbox Code Playgroud)

pdf r knitr r-markdown kable

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

R中的download.file()具有非零退出状态

我试图在R 3.0.1(Windows 7)中下载文件:

    fileUrl <- "https://data.baltimorecity.gov/api/views/dz54-2aru/rows.csv?accessType=DOWNLOAD"
    download.file(fileUrl, destfile="./data/cameras.csv", method="curl")
Run Code Online (Sandbox Code Playgroud)

我检查了网址和我的互联网连接,他们似乎工作得很好.但是,我收到此消息:

    Warning message:  
    In download.file(fileUrl, destfile = "./data/cameras.csv", method = "curl") : 
    download had nonzero exit status
Run Code Online (Sandbox Code Playgroud)

在网上找不到任何帮助,有谁知道如何解决这个问题?

r download

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

保存Rstudio面板中已存在的所有图表

我为一个项目做了不同的情节(超过一百个),我没有在路上捕捉它们(是的,它很糟糕,我知道).现在,我需要立即保存它们,但不再运行我的脚本(这需要几个小时).有没有办法在Rstudio内这样做?

编辑:所有的情节都已存在,我不想再次运行它们.

r rstudio

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

错误:对于'sort.list',x必须是原子的

这很奇怪.我收到这个错误

sort.list(y)出错:'x'必须是'sort.list'的原子'
你有没有在列表上调用'sort'?

当我在列表上执行此代码时

 cc3 <- as.data.frame(table(cc2))
Run Code Online (Sandbox Code Playgroud)

什么可能是错的?

这是名单的负责人.

head(cc2)   
V1
1:    174
2:    174
3:    211
4: 177106
5: 177106
6: 177106 
Run Code Online (Sandbox Code Playgroud)

编辑:当我跑步时,str(cc2) 我明白了

Classes ‘data.table’ and 'data.frame':  149706 obs. of  1 variable:
$ V1:List of 149706
..$ : Named chr "174"
.. ..- attr(*, "names")= chr "V11"
..$ : Named chr "174"
 .. ..- attr(*, "names")= chr "V7"
 ..$ : Named chr "211"
  .. ..- attr(*, "names")= chr "V6"
 .. [list output truncated]
 - attr(*, ".internal.selfref")=<externalptr> 
Run Code Online (Sandbox Code Playgroud)

r

13
推荐指数
2
解决办法
6万
查看次数

R监督潜在Dirichlet分配包

我正在使用这个LDA包用于R.特别是我正在尝试进行监督潜在的dirichlet分配(slda).在链接包中,有一个slda.em功能.但令我困惑的是它要求alpha,eta和variance参数.据我了解,我认为这些参数在模型中是未知的.所以我的问题是,包的作者是否意味着这些是参数的初步猜测?如果是,似乎没有办法从运行结果中访问它们slda.em.

除了编码算法中的额外EM步骤之外,是否有建议的方法来猜测这些参数的合理值?

r dirichlet topic-modeling latent-semantic-analysis

13
推荐指数
1
解决办法
2469
查看次数

使用extrafont包将字体导入R.

我正在尝试使用该extrafont包将Garamond导入R. 当使用font_import()指向字体位置文件夹的未指定函数时,我能够成功导入其他字体,但我错过了该文件夹中的几种字体.任何建议为什么只导入某些字体而其他字体不导入?

我试过了

font_import(pattern = "Garamond.ttf")
ttf_import(pattern = "Garamond.ttf")
Run Code Online (Sandbox Code Playgroud)

带有以下错误消息:

扫描/ Library/Fonts /,/ System/Library/Fonts中的ttf文件,〜/ Library/Fonts/...从.ttf文件中提取.afm文件... data.frame中的错误(fontfile = ttfiles,FontName =" ",stringsAsFactors = FALSE):参数意味着行数不同:0,1

fonts r

13
推荐指数
3
解决办法
6845
查看次数

填写R中数据框中的值?

假设我有这个数据框:

  times vals
1     1    2
2     3    4
3     7    6
Run Code Online (Sandbox Code Playgroud)

设置

foo <- data.frame(times=c(1,3,7), vals=c(2,4,6))
Run Code Online (Sandbox Code Playgroud)

我想要这个:

  times vals
1     1    2
2     2    2
3     3    4
4     4    4
5     5    4
6     6    4
7     7    6
Run Code Online (Sandbox Code Playgroud)

也就是说,我希望从1到7填写所有时间,并填写不超过给定时间的最新时间的val.

我有一些代码使用dplyr来做,但它很难看.建议更好?

library(dplyr)

foo <- merge(foo, data.frame(times=1:max(foo$times)), all.y=TRUE)
foo2 <- merge(foo, foo, by=c(), suffixes=c('', '.1'))

foo2 <- foo2 %>% filter(is.na(vals) & !is.na(vals.1) & times.1 <= times) %>%
  group_by(times) %>% arrange(-times.1) %>% mutate(rn = row_number()) %>%
  filter(rn == 1) %>% …
Run Code Online (Sandbox Code Playgroud)

r dataframe dplyr

13
推荐指数
3
解决办法
2159
查看次数

预览开发R文档

我使用的是写我的第一个R包装devtoolsroxygen2在RStudio IDE.我遇到的问题与预览.Rd文件有关,当我"循环".R文件时.我正在使用devtools::document()以获取.Rd文件,但是当我尝试通过编写以下任何一个来预览帮助页面时:

help("FunctionName")
?FunctionName
Run Code Online (Sandbox Code Playgroud)

控制台显示消息"使用开发文档...",但帮助窗口中有一个空白区域.使用devtools:load_all()导致同样的问题.也许这与devtools在环境中加载包的方式有关,但是文档"Writing R Extensions"(预计不会被查阅使用roxygen)和Hadley Wickham的书籍"R包"都没有提供可行的解决方案.

documentation r devtools roxygen2

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