1 2 3
c=:0 0 1 0 2 1 4,1e7$0 NB. Initialized cache t=:{{r[c=:c y}~r=:{{1e6|+`+`+`-/(2(1e6&|@^)<.-:y-6),c{~y-2 2 6 4}}y}} problem710=:>:^:(0~:1e6|t)^:_]6