list.files()
dat <- read.csv("scrapped_data_Notion.csv", header = T, sep = ",")
dat
LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KDQpgYGB7cn0NCmxpc3QuZmlsZXMoKQ0KYGBgDQoNCg0KYGBge3J9DQoNCmRhdCA8LSByZWFkLmNzdigic2NyYXBwZWRfZGF0YV9Ob3Rpb24uY3N2IiwgaGVhZGVyID0gVCwgc2VwID0gIiwiKQ0KDQpkYXQNCmBgYA==