Basics

Whitespace

stuff <- data %>%
filter() %>%
select()
things <- 2
stuff <- data %>%
  filter() %>%
  select()
things <- 2
range(x, x + 10)

Naming

Long lines

site_data <- data.frame(
  site_id = c(1, 2, 3, 4),
  type = c('control', 'control', 'experiment', 'experiment')
)