## code to prepare `PsychData` dataset goes here
library(readr)
library(readxl)
Rotter <- readRDS("data-raw/WRotter.rds")
Gantt <-read.csv("data-raw/gantt.csv")
Spot <- read.csv("data-raw/spot.csv")
FFMQ.CFA <-read_excel("data-raw/FSS_Sturctural_analysis_teaches_278.xlsx")
FFMQ.Val <- read_excel("data-raw/Validity_analysis_of_FSS.xlsx")
LEBA <-readRDS("data-raw/Light_survey.rds")
usethis::use_data(Rotter, Gantt, Spot,FFMQ.CFA,FFMQ.Val,LEBA, overwrite = T)
install.packages("sinew")
sinew::makeOxygen(LEBA, add_fields = "source")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.