tidyjson (version 0.2.4)

companies: Startup company information for 1,000 companies

Description

From: http://jsonstudio.com/resources/

Usage

companies

Arguments

Format

JSON

Examples

Run this code
# NOT RUN {
library(dplyr)

# Companies is a long character vector
companies %>% str

# Work with a small sample
co_samp <- companies[1:5]

# Gather top level values and glimpse
co_samp %>% spread_all %>% glimpse

# Get the key employees data for the first 100 companies
key_employees <- companies[1:100] %>%
  spread_all %>%
  select(name) %>%
  enter_object(relationships) %>%
  gather_array() %>%
  spread_all

key_employees %>% glimpse

# Show the top 10 titles
key_employees %>%
  filter(!is_past) %>%
  count(title) %>%
  arrange(desc(n)) %>%
  top_n(10)
# }

Run the code above in your browser using DataCamp Workspace