// time = 0.161 seconds

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