Advertisement
Guest User

Untitled

a guest
Feb 20th, 2019
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.48 KB | None | 0 0
  1. li = list()
  2.  
  3. var = "continent"
  4. val = "Europe"
  5. li = append(li, quo(!!sym(var) %in% !!val))
  6.  
  7. var = "year"
  8. val = 1980
  9. li = append(li, quo(!!sym(var) <= !!val))
  10.  
  11. li
  12.  
  13. > li
  14. [[1]]
  15. <quosure>
  16. expr: ^continent %in% "Europe"
  17. env: global
  18.  
  19. [[2]]
  20. <quosure>
  21. expr: ^year <= 1980
  22. env: global
  23.  
  24. li = list()
  25.  
  26. var = "continent"
  27. val = "Europe"
  28. li = modifyList(li, list(quo(!!sym(var) %in% !!val)))
  29.  
  30. var = "year"
  31. val = 1980
  32. li = modifyList(li, list(quo(!!sym(var) <= !!val)))
  33.  
  34. li
  35. > li
  36. list()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement