小编Abh*_*nav的帖子

我试图使用render语句将rmd文件转换为pdf.

render("MiningReport.Rmd", "pdf_document",output_dir = "C:/ProjectSocial/Reports/Twitter/Maybelline")

我收到如下错误

Quitting from lines 109-113 (MiningReport.Rmd) 
Error in object[seq_len(ile)] : 
  object of type 'symbol' is not subsettable

这看起来很奇怪,因为当我编写Rmd文件时,没有这样的错误,并且pdf报告生成成功,当我尝试使用render语句执行相同操作时,它会给出错误.任何人都可以解释一下发生了什么？下面是错误蔓延的代码块

```{r assoc ,echo=F,message=FALSE}
library(tm)
findAssocs(myTdm,df$term[1:10],0.5)
```

当我删除上面的块时,下一个代码块发生相同的错误.下面是我的Rmd文件.我正在阅读存储在指定目录中的文件中的推文.

```{r computedate,echo = FALSE}
date1 <-format(Sys.Date() - 7,"%B %d")
date2 <-format(Sys.Date() - 1,"%B %d, %Y")

```

# This report has been created on twitter data from `r date1` to `r date2`.
# Analysis of Tweets
## Below we can see the most frequent words.

```{r frequent,echo=FALSE,message=FALSE,warning=FALSE,cache=TRUE}

setwd("C:/ProjectSocial/Data/TwitterData/Maybelline")

library(devtools)
library(twitteR)
library(tm) …

我有以下数据帧.这只是头部,日期跨越2个月.我的问题是我如何在数据框中创建一个新的因子变量,有两个级别,"工作日"和"周末",表明给定日期是工作日还是周末日？

    steps        date      interval
1 37.3826  2012-10-01             0
2 37.3826  2012-10-01             5
3 37.3826  2012-10-01            10
4 37.3826  2012-10-01            15
5 37.3826  2012-10-01            20
6 37.3826  2012-10-01            25

我有一个如下所示的列表。我想打印它，就像它在我闪亮的应用程序中的样子一样。我尝试了 print(unlist(ls)) ，其中 ls 是下面显示的列表，但它只是打印数字。我还尝试了 Hmisc 包中的 print.char.list 但它给出了错误

Error in x[[1]][1, ] : incorrect number of dimensions. 

那么我怎样才能打印出名字呢？提前致谢。

$money
bankaccount       cryin   desperate      feelin      likely      loaded      poppin       build      moment 
       0.73        0.73        0.73        0.73        0.73        0.73        0.73        0.62        0.59 
      spend       spent 
       0.51        0.51 

$matter
becauseit    racest   spanish     found    whites     races 
     0.63      0.63      0.63      0.56      0.56      0.55 

$little
appropriate    carrying       usual 
       0.56        0.56        0.56 

$still
    cloth     codes glamorous     grade 
     0.57      0.57      0.57      0.57 

我试图根据Twitter上关于一个名为Maybelline的品牌的推文数量找到最多的粉丝.该品牌拥有约600,000粉丝,当我尝试检索它们时,代码会持续运行数小时.那么有一种有效的方法吗？我在设置twitter身份验证后使用以下代码.我想要所有关于美宝莲的推文最多的粉丝(前50名).

user<-getUser('Maybelline')
user$toDataFrame()
followers<-user$getFollowers() 

谢谢