// time = 0.199 seconds

data[48]:=[*
<48, 1, 1, [ 1, -1 ], 0, [
<2, x>,
<3, x - 1>,
<5, x + 2>,
<7, x>,
<11, x + 4>,
<13, x + 2>,
<17, x - 2>,
<19, x - 4>
]>
*];