Partition::pdep error how to deal with it in particular situation?

Questions
4

Not really, you have not described what you are trying to achieve, and I cannot read your mind. Based on your previous almost identical question , maybe this?

list = {0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 233, 377, 610, 
   987, 1597, 2584, 4181, 6765, 10946, 17711, 28657, 46368, 75025, 
   121393, 196418, 317811, 514229, 832040, 1346269};

digitalRoots = FixedPoint[IntegerDigits/*Total, #] & /@ list

colored = 
 digitalRoots /. {r : (1 | 4 | 7) :> Style[r, Red, 24], 
   g : (2 | 5 | 8) :> Style[g, Green, 24], 
   b : (3 | 6 | 9) :> Style[b, Blue, 24]}

Partition[colored, UpTo@4] // TableForm