I have a telematic insurance dataset with 1-sec sample for a driver that agreed to have installed in its vehicle an event data recorder. This is how data look like:
head(y,15)
ACCELERATION GPS_SPEED
2071513 0.012 1
2071514 0.012 2
2071515 0.012 3
2071516 0.012 4
2071517 0.012 5
2071518 0.012 6
2071519 0.012 7
2071520 0.012 8
2071521 0.012 9
2071522 0.000 10
2071523 -0.012 16
2071524 -0.012 17
2071525 0.000 24
2071526 0.084 25
2071527 0.096 26
I would like to create a v-a heatmap as follow:
The code I tried to build and run, is hereby:
y <- as.data.frame(head(dplyr::select(data1, RT_AVG_ACC_X, RT_GPS_SPEED),5000))
y <- as.matrix(y)
heatmap(y)
The result is pretty awful:
Would you guys please help me?
Thank you all.
Result of the code in the answer: