Description Usage Arguments Value Credit Author(s) See Also Examples
Calculate normal and weighted sds while excluding gaps in data
1 2 3 4 |
tracks |
|
ctarget |
|
cweight |
|
cgaps |
|
cname |
|
drop |
|
t_id |
character or numeric. Column name in |
des_df |
|
Data frame
id |
id of the track |
sd |
calculated sd of the track |
If you use 'psyosphere' for commercial use or research, please support us by include one off the following references:
MIT license: "psyosphere" by B. Ziepert, E. G. Ufkes & P. W. de Vries from https://CRAN.R-project.org/package=psyosphere
APA: Ziepert, B., Ufkes, E., & de Vries, P. W. (2018). psyosphere: Analyse GPS Data. Retrieved from https://CRAN.R-project.org/package=psyosphere
APA: Vries, P., Ziepert, B., & Ufkes, E. (2016). "De psychologie van bewegingen GPS-technologie voor de analyse van natuurlijk gedrag." Tijdschrift voor Human Factors 2: 11-15.
Benjamin Ziepert. Please send feedback to: feedback-psyosphere@analyse-gps.com.
des_summary
, des_duplicates
, des_first
, des_last
, des_length
, des_max
, des_min
, des_mean
, des_sum
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 | ## Not run:
# Get example data
data(psyo_rounds2)
psyo_rounds2 <- psyo_rounds2[ c(1:5,11:15) ,]
# clean-up data
psyo_rounds2 <- average_duplicates(psyo_rounds2)
# Add gap segments
psyo_rounds2 <- t_time_difference(psyo_rounds2)
psyo_rounds2 <- mark_time_gaps(psyo_rounds2)
# Add speed
psyo_rounds2 <- t_speed(psyo_rounds2)
# Calculate different sds
normal <- des_sd(psyo_rounds2, "speed", cname = "normal")
weighted <- des_sd(
psyo_rounds2, "speed", cweight = "time_difference", cname = "weighted"
)
segmented <- des_sd(
psyo_rounds2, "speed", cgaps= "time_gap", cname = "segmented"
)
segmented_weighted <- des_sd(
psyo_rounds2,
"speed",
cweight = "time_difference",
cgaps = "time_gap",
cname = "segmented_weighted"
)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.