# NOT RUN {
'{"foo": 5, "bar": 7}' %>% select(a = .foo) %>% peek
'{"foo": 5, "bar": 7}' %>% select(a = .foo)
# using json dataset, just first element
x <- commits %>% index(0)
x %>%
select(message = .commit.message, name = .commit.committer.name)
x %>% select(sha = .commit.tree.sha, author = .author.login)
# using json dataset, all elements
x <- index(commits)
x %>% select(message = .commit.message, name = .commit.committer.name)
x %>% select(sha = .sha, name = .commit.committer.name)
# many JSON inputs
'{"foo": 5, "bar": 7} {"foo": 50, "bar": 7} {"foo": 500, "bar": 7}' %>%
select(hello = .foo)
# }
Run the code above in your browser using DataLab