# Load library
library(tidyverse)
# Import data
tik_tok <- read_csv(file = "https://raw.githubusercontent.com/zief0002/epsy-5261/main/data/tik-tok.csv")
# View data
tik_toktik-tok.csv
Social media plays a big part in many people’s lives. The rise of TikTok influencers also gives rise to a mountain of data. The tik-tok.csv data include information on tik-tok influencers sampled in 2022. The data were made available on kaggle by Ram Jas.
The attributes included in the data are:
name: Tik-tok influencer’s handleviews: Total number of viewslikes: Total number of likescomments: Total number of comments
Preview
# A tibble: 50 × 4
name views likes comments
<chr> <dbl> <dbl> <dbl>
1 Aaron Murphy 1500000 173400 1400
2 Kevin Gates 3500000 413600 9400
3 Cale Brown 2700000 459500 1500
4 JustTheNobodys 1400000 175800 2200
5 Vanessa Lopes 5900000 637100 6400
6 𝙍𝙮𝙖𝙣𝘽𝙖𝙠𝙚𝙧𝙮 1600000 171300 2400
7 Lele Pons 2200000 307400 1900
8 icebox 3000000 277200 3300
9 แจ็ก แปปโฮ 2800000 344100 766
10 Andrew Schulz 4000000 602200 2200
# ℹ 40 more rows