Read specific sheet

penguins_url <- "https://docs.google.com/spreadsheets/d/1aFu8lnD_g0yjF5O-K6SFgSEWiHPpgvFCF0NY9D6LXnY"

read_sheet(penguins_url, sheet = "Torgersen Island")

## # A tibble: 52 × 8
##    species island    bill_length_mm bill_depth_mm flipper_length_mm body_mass_g
##    <chr>   <chr>     <list>         <list>        <list>            <list>     
##  1 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
##  2 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
##  3 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
##  4 Adelie  Torgersen <chr [1]>      <chr [1]>     <chr [1]>         <chr [1]>  
##  5 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
##  6 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
##  7 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
##  8 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
##  9 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
## 10 Adelie  Torgersen <dbl [1]>      <dbl [1]>     <dbl [1]>         <dbl [1]>  
## # ℹ 42 more rows
## # ℹ 2 more variables: sex <chr>, year <dbl>