小编Chr*_*ton的帖子

dplyr对行的子集进行mutate/replace

我正在尝试基于dplyr的工作流程(而不是主要使用我习惯的data.table),而且我遇到了一个问题,我无法找到一个等效的dplyr解决方案.我经常遇到需要根据单个条件有条件地更新/替换多个列的场景.这是一些示例代码,我的data.table解决方案:

library(data.table)

# Create some sample data
set.seed(1)
dt <- data.table(site = sample(1:6, 50, replace=T),
                 space = sample(1:4, 50, replace=T),
                 measure = sample(c('cfl', 'led', 'linear', 'exit'), 50, 
                               replace=T),
                 qty = round(runif(50) * 30),
                 qty.exit = 0,
                 delta.watts = sample(10.5:100.5, 50, replace=T),
                 cf = runif(50))

# Replace the values of several columns for rows where measure is "exit"
dt <- dt[measure == 'exit', 
         `:=`(qty.exit = qty,
              cf = 0,
              delta.watts = 13)]
Run Code Online (Sandbox Code Playgroud)

是否有一个简单的dplyr解决方案来解决同样的问题?我想避免使用ifelse,因为我不想多次输入条件 - 这是一个简化的例子,但有时很多基于单个条件的赋值.

在此先感谢您的帮助!

r dplyr data.table

65
推荐指数
9
解决办法
3万
查看次数

在rmarkdown pdf中更改纸张尺寸和方向

我想使用rmarkdown创建一个PDF,它是A3(或11x17,理想情况下)和横向.我可以通过在YAML标头中指定选项来完成其中一个,但不能同时指定两个选项.这是我最好的尝试 - 每个分类选项值单独起作用,但不是一起起作用:

---
title: "Test"
output: 
  pdf_document:
    toc: true
    number_sections: true
documentclass: article
classoption: 
  landscape
  a3paper
---
Run Code Online (Sandbox Code Playgroud)

这个问题是相关的,但在这种情况下没有答案.提前感谢您提供的任何帮助!

latex r knitr r-markdown

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

标签 统计

r ×2

data.table ×1

dplyr ×1

knitr ×1

latex ×1

r-markdown ×1