Example data file for helicopter flying time exercise. See Chapter 1 in Regression and Other Stories.
library("rprojroot")
root<-has_file(".ROS-Examples-root")$make_fix_file()
helicopters <- read.table(root("Helicopters/data","helicopters.txt"), header=TRUE)
print(helicopters)
Helicopter_ID width_cm length_cm time_sec
1 1 4.6 8.2 1.64
2 1 4.6 8.2 1.74
3 1 4.6 8.2 1.68
4 1 4.6 8.2 1.62
5 1 4.6 8.2 1.68
6 1 4.6 8.2 1.70
7 1 4.6 8.2 1.62
8 1 4.6 8.2 1.66
9 1 4.6 8.2 1.69
10 1 4.6 8.2 1.62
11 2 4.6 8.2 1.62
12 2 4.6 8.2 1.65
13 2 4.6 8.2 1.66
14 2 4.6 8.2 1.63
15 2 4.6 8.2 1.66
16 2 4.6 8.2 1.71
17 2 4.6 8.2 1.64
18 2 4.6 8.2 1.69
19 2 4.6 8.2 1.59
20 2 4.6 8.2 1.61