A repository for analyzing circadian data
devtools::install_github("edpclau/circadian-dynamics")
monitor <- read_trikinetics()
monitor_downsampled <- downsample_time_series(monitor[-2], amount = 1, units = "hour", method = "sum")
monitor_processed <- multivariate_process_timeseries(
df = monitor_downsampled,
sampling_rate = '1 hour',
window_size_in_days =3,
window_step_in_days = 1,
detrend_data = TRUE,
butterworth = TRUE,
f_low=1/4,
f_high=0,
plot = TRUE
)
monitor_analysis <- multivariate_rythm_analysis(
monitor_processed,
sampling_rate = "1 hour",
alpha=0.000000001,
autocorrelation = TRUE,
lomb_scargle = TRUE,
from = 16, to = 32,
ofac =60)
export_all(raw_data = monitor_downsampled,
processed_data = monitor_processed,
rythm_analysis_data = monitor_analysis,
autocorrelation = TRUE,
new_dir_name = "Monitor_40")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.