if (FALSE) {
## first create the login object
login <- movebankLogin()
## get acceleration data for one individual
str(getMovebankNonLocationData(study=74496970 , sensorID="Acceleration",
animalName="DER AR439", login=login))
## get acceleration data for one individual after the "2013-07-12 06:50:07.000"
str(getMovebankNonLocationData(study=74496970 , sensorID="Acceleration", animalName="DER AR439",
login=login, timestamp_start="20130712065007000"))
# get acceleration data for all individuals of the study between
# the "2013-08-15 15:00:00.000" and "2013-08-15 15:01:00.000"
str(getMovebankNonLocationData(study=74496970 , sensorID=2365683,
login=login, timestamp_start="20130815150000000",
timestamp_end="20130815150100000"))
}
Run the code above in your browser using DataLab