// time = 0.06 seconds

data[47]:=[*
<47, 1, 4, [ -1 ], 0, [
<2, x^4 - x^3 - 5*x^2 + 5*x - 1>,
<3, x^4 - 7*x^2 + 4*x + 1>,
<5, x^4 + 2*x^3 - 16*x^2 - 16*x + 48>,
<7, x^4 - 4*x^3 - 7*x^2 + 44*x - 43>,
<11, x^4 + 6*x^3 - 4*x^2 - 56*x - 48>,
<13, x^4 - 8*x^3 + 56*x + 48>,
<17, x^4 - 6*x^3 - 21*x^2 + 74*x + 141>,
<19, x^4 - 16*x^2 - 8*x + 16>
]>
*];