x <- tibble::tibble(
study_id = "test-study",
participant_id = "12345",
data_format = "cams 1.0.0",
start_time = "2021-11-14 16:40:00.123456",
end_time = NULL,
sensor = "Activity",
data = list(list(
confidence = 80,
type = "WALKING"
))
)
class(x) <- c("activity", class(x))
mpathsenser:::unpack_sensor_data(x)
Run the code above in your browser using DataLab