gistfile1.txt

traditional <- data.frame(
  a = 4,
  b = list('caterpillars', 'porcupines', 'elephants', 
    'electric eels that approach silently',
     paste(something())
  )
)
  
lispy <-
   data.frame(a = 4,
              b = list('caterpillars', 'porcupines', 'elephants',
                       'electric eels that approach silently',
                       paste(something())))

#######

traditional2 <- some_func(
  takes_a_very(long),
  list(
    of, arg, u(ments), which(nest), 'rather',
    'deeply', 'becoming', cumbersome(to_keep_track_of())
  )
)

lispy2 <- some_func(takes_a_very(long),
                    list(of, arg, u(ments), which(nest), 
                         'rather', 'deeply', 'becoming',
                         cumbersome(to_keep_track_of())))

hybrid2 <- some_func(
  takes_a_very(long),
  list(
    of, arg, u(ments), which(nest), 'rather', 'deeply', 'becoming',
    cumbersome(to_keep_track_of())))