我用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,则数字数据也会转换为字符,因此它们无法用于统计过程.
我试图安装的软件包rpanel和tkrplot上RStudio.下载并安装后,我收到此消息:
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 Markdown到pdf如下:
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) 我试图在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)
在网上找不到任何帮助,有谁知道如何解决这个问题?
我为一个项目做了不同的情节(超过一百个),我没有在路上捕捉它们(是的,它很糟糕,我知道).现在,我需要立即保存它们,但不再运行我的脚本(这需要几个小时).有没有办法在Rstudio内这样做?
编辑:所有的情节都已存在,我不想再次运行它们.
这很奇怪.我收到这个错误
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) 我正在使用这个LDA包用于R.特别是我正在尝试进行监督潜在的dirichlet分配(slda).在链接包中,有一个slda.em功能.但令我困惑的是它要求alpha,eta和variance参数.据我了解,我认为这些参数在模型中是未知的.所以我的问题是,包的作者是否意味着这些是参数的初步猜测?如果是,似乎没有办法从运行结果中访问它们slda.em.
除了编码算法中的额外EM步骤之外,是否有建议的方法来猜测这些参数的合理值?
我正在尝试使用该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
假设我有这个数据框:
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包装devtools和roxygen2在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包"都没有提供可行的解决方案.