data-raw/PsychData.R

## 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")
m-a-siraji/BAAP documentation built on May 7, 2024, 12:54 p.m.