if (FALSE) {
# Open a database connection
db <- open_db("path/to/db")
# Get the number of rows for all sensors
get_nrows(db, sensor = NULL)
# Get the number of rows for the Accelerometer and Gyroscope sensors
get_nrows(db, c("Accelerometer", "Gyroscope"))
# Remember to close the connection
close_db(db)
}
Run the code above in your browser using DataLab