10.9 Chapter 10 Review Questions 2
require(coursekata)
top_50_long <- read.csv("https://docs.google.com/spreadsheets/d/e/2PACX-1vTnNejzAPGLo_IgpbkWwjhUG7LGpJmHmIZ78AmT6tR2pgaUfApsOSQaLPMZ9oZ-bpSgvKGErmdaLKhz/pub?gid=1143384330&single=true&output=csv")
top_50 <- select(top_50_long, track_name, artist_name, genre, bpm, danceability, length, popularity)
# run your code hereCK Code: C1_Code_Review2_01
require(coursekata)
top_50_long <- read.csv("https://docs.google.com/spreadsheets/d/e/2PACX-1vTnNejzAPGLo_IgpbkWwjhUG7LGpJmHmIZ78AmT6tR2pgaUfApsOSQaLPMZ9oZ-bpSgvKGErmdaLKhz/pub?gid=1143384330&single=true&output=csv")
top_50 <- select(top_50_long, track_name, artist_name, genre, bpm, danceability, length, popularity)
# run your code hereCK Code: C1_Code_Review2_02