list3 = NestList[
ArrayFlatten[{{{#, 0, #}, {0, 0, 0}, {#, 0, #}}, {{0, 0, 0}, {0, #,
0}, {0, 0, 0}}, {{#, 0, #}, {0, 0, 0}, {#, 0, #}}}] &, {{{1}}},
3];
How can the code form in the image be rewritten equivalently in one-dimensional form?
