DS: Chapter 1 - 2 Group Test (Make a duplicate)

# Run this code to load the required packages suppressMessages(suppressWarnings(suppressPackageStartupMessages({ library(mosaic) library(supernova) library(fivethirtyeight) }))) nbaplayers <- read.csv("https://docs.google.com/spreadsheets/d/e/2PACX-1vSWOzObVF0AHcXHCxZepTDtTjhpIE4PkrrlnxK67XVxuOwt8iSqz9G-VQKwez54xZfXhYe1Yj5PlA0-/pub?gid=2123483031&single=true&output=csv", head = TRUE)

#Darren Lin head(nbaplayers)

#ELisha Loreto filter(nbaplayers, age == 21 )

#Monae filter(nbaplayers, country == "USA")

#Marjona filter(nbaplayers, height == 210.82)

filter(nbaplayers, player_name == "Eric Leckner")

select(nbaplayers, team) tally(nbaplayers$team)

select(nbaplayers, college) tally(nbaplayers$college)

select(nbaplayers, country) tally(nbaplayers$country)

Team, college, and country

There’s an error in this block

Try running the app again, or contact the app’s creator

arrange(nbaplayers, desc(pts)

There has been an error in the blocks above

Run the app again or contact app’s creator

tally(sort(nbaplayers$pts))

There has been an error in the blocks above

Run the app again or contact app’s creator

gf_dhistogram(~ pts, data = nbaplayers)

There has been an error in the blocks above

Run the app again or contact app’s creator