小编Gre*_*ima的帖子

在尝试编织PDF.我正在调用一个脚本,它应该通过调用块返回两个ggplots:

```{r, echo=FALSE}

read_chunk('Script.R')

```r

但收到错误

processing file: Preview-24a46368403c.Rmd

 Quitting from lines 9-12 (Preview-24a46368403c.Rmd)  Error in
 parse(text = x, srcfile = src) :    attempt to use zero-length
 variable name Calls: <Anonymous> ... <Anonymous> -> parse_all ->
 parse_all.character -> parse Execution halted

脚本自己运行并返回两个图,但在编织时不会返回它们.

同样尝试使用source() 但得到了类似的错误

 Quitting from lines 7-10 (Preview-24a459ca4c1.Rmd)  Error in
 file(filename, "r", encoding = encoding) :    cannot open the
 connection Calls: <Anonymous> ... withCallingHandlers -> withVisible
 -> eval -> eval -> source -> file Execution halted

使用示例数据:

d1<-data.frame(years=c("1","5","10"),group.x=c(1:3),group.b=c(1:3),group.2x=c(1:3))

我使用以下方法删除了列:

d2<-d1[,-grep("\\.x$",colnames(d1))]

是否有类似的方法来完成相同的使用管道？

d2<- d1 %>%
        filter(!grep("\\.x$",colnames()))

收益: Error: argument "x" is missing, with no default

目标是删除以.结尾的列 ".x"

我用的时候

Select Distinct Brand_ID
from db.ABC
WHERE
Brand_ID <> 800

我得到了返回的输出:

+----------+
| Brand_ID |
+----------+
|      100 |
|      200 |
|      300 |
|      400 |
|      500 |
|      600 |
|      700 |
|      900 |
+----------+

但是,该列确实包含NULL值,它们存在.我需要更新我的select语句以明确说:

Select Distinct Brand_ID
from db.ABC
WHERE
Brand_ID <> 800 OR Brand_ID IS NULL

要获得正确的输出:

+----------+
| Brand_ID |
+----------+
| NULL     |
| 100      |
| 200      |
| 300      |
| 400      |
| 500      |
| …

我正在使用我下载的一组 Fitbit 数据，它有一个我试图正确订购的工作日列表。现在，当前的数据集没有“星期五”，但无论如何我都希望这些因素包括它。

即使数据集中只有 6 个工作日，我如何继续将工作日计算为 1-7？

file<-choose.files()
   slp<-data.frame(read.csv(file))

   wkdaylevels<-c("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday")

    slp$FellAsleepAt<-strptime(slp$FellAsleepAt, format="%B %e, %Y at %I:%M%p")
    slp$AwokeAt<-strptime(slp$AwokeAt,format="%B %e, %Y at %I:%M%p")
    slp$TotalTimeSlept<-gsub("h ",":",slp$TotalTimeSlept)
    slp$TotalTimeSlept<-gsub("m","",slp$TotalTimeSlept)
    slp$TimeAsleep<-as.numeric(difftime(slp$AwokeAt,slp$FellAsleepAt))
    slp$Date<-as.Date(slp$FellAsleepAt, format="%M/%D/%Y")
    slp$DayofWeek<-as.factor(weekdays(slp$Date),levels=wkdaylevels)



    ggplot(slp,aes(x=DayofWeek,y=TimeAsleep))+
        geom_point()

这里的数据：https : //docs.google.com/spreadsheets/d/1Vdgmtwx0vNKDKEZFMEGAWQ58H66ia-xjI0evR7idfkc/edit?usp=sharing

我正在寻找重新创建一个由 SurveyMonkey 填充的表格（例如： https: //i.stack.imgur.com/5MyV1.jpg） - 左侧是问题（例如因子 X 有多重要？ ）然后离散变量总是相同的：完全不，轻微......等等。

获取以下格式的数据的最佳方法是什么（列#s是问题并以结果prop.table结尾？：

            Q1        Q2        Q3        Q4
         Very       Very       Very Moderately
   Moderately   Slightly  Extremely Moderately
   Not at all       Very       Very   Slightly
   Not at all Moderately Not at all Not at all
    Extremely  Extremely  Extremely  Extremely
     Slightly       Very  Extremely   Slightly