Tag Info

New answers tagged

2

I confirm the issue in Version 9.0.1.0 (Windows 8 64-bit). A workaround is wrapping NumberForm with OutputForm: t2b = Table[{i, OutputForm[NumberForm[Range[i + #], {2, 2}]] & /@ Range[2]}, {i, 1, 2}] Export["tryb.dat", t2b]; FilePrint["tryb.dat" ]


1

You have an extra pair of list brackets in t2 which you can remove like so:- t2 = Table[{i, Apply[Sequence, NumberForm[Range[i + #], {2, 2}] & /@ Range[2]]}, {i, 1, 2}] Then it works like t1. Export["try.dat", t2]; FilePrint["try.dat"] (* 1 {1.00, 2.00} {1.00, 2.00, 3.00} *) (* 2 {1.00, 2.00, 3.00} {1.00, 2.00, 3.00, 4.00} *)



Top 50 recent answers are included