# Create sample tracking data
sample_data <- data.frame(time = rep(1:3, each = 5),
particleID = rep(1:5, 3),
px = rnorm(15),py = rnorm(15),
vx = rnorm(15),vy = rnorm(15)
)
# Convert to particle.data object
traj <- trajectory_data(sample_data)
# Display summary
show(traj)
Run the code above in your browser using DataLab