Cheers Jim!
The 0/1 way seems to work for me. It looks like:
n <- 5 # number of “shops”
i <- 12 # number of time intervals per hour
# creating a data.frame (the example got random values)
business_hours <- data.frame(1:n, matrix(data = sample(x = c(TRUE, FALSE), size
= n * (24 * i), replace = TRUE), ncol = 24 * i))
# column names as the times
colnames(x = business_hours) <- c("Id", paste0("t", sprintf(fmt = "%02d", rep(x
= 0:23, each = i)), sprintf(fmt = "%02d", rep(x = seq(from = 0, to = 60/i * (i
- 1), by = 60/i), times = 24))))
# some data analysis
plot(x = colSums(x = business_hours[, -1]), type = "s") # looks odd due to the
random assignment of open/closed
summary(object = rowSums(x = business_hours[, -1])/i) # summary of business
duration in hours
Best regards,
Alex
--
Alexander Sommer
wissenschaftlicher Mitarbeiter
Technische Universität Dortmund
Fakultät Erziehungswissenschaft, Psychologie und Soziologie
Forschungsverbund Deutsches Jugendinstitut/Technische Universität Dortmund
Vogelpothsweg 78
44227 Dortmund
Telefon: +49 231 755-8189
Telefax: +49 231 755-6553
E-Mail: alexander.som...@tu-dortmund.de
WWW: http://www.forschungsverbund.tu-dortmund.de/
Wichtiger Hinweis: Die Information in dieser E-Mail ist vertraulich. Sie ist
ausschließlich für den Adressaten bestimmt. Sollten Sie nicht der für diese
E-Mail bestimmte Adressat sein, unterrichten Sie bitte den Absender und
vernichten Sie diese Mail. Vielen Dank.
Unbeschadet der Korrespondenz per E-Mail, sind unsere Erklärungen
ausschließlich final rechtsverbindlich, wenn sie in herkömmlicher Schriftform
(mit eigenhändiger Unterschrift) oder durch Übermittlung eines solchen
Schriftstücks per Telefax erfolgen.
Important note: The information included in this e-mail is confidential. It is
solely intended for the recipient. If you are not the intended recipient of
this e-mail please contact the sender and delete this message. Thank you.
Without prejudice of e-mail correspondence, our statements are only legally
binding when they are made in the conventional written form (with personal
signature) or when such documents are sent by fax.
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
