Mathematica crash when exporting to HTML? is it me?

*To*: mathgroup at smc.vnet.net*Subject*: [mg112841] Mathematica crash when exporting to HTML? is it me?*From*: "Nasser M. Abbasi" <nma at 12000.org>*Date*: Sun, 3 Oct 2010 03:37:37 -0400 (EDT)*Reply-to*: nma at 12000.org

I do not know what I did, or may be Mathematica has a problem exporting to html some formating. When I open a notebook, and run this code: -------------------- h = {0.1, 0.05, 0.01, 0.005, 0.001}; exact = Cos[1]; derivativeRight = (Sin[1. + \[CapitalDelta]] - Sin[1.])/\[CapitalDelta]; derivativeLeft = (Sin[1.] - Sin[1. - \[CapitalDelta]])/\[CapitalDelta]; derivativeCenter = (Sin[1. + \[CapitalDelta]] - Sin[1. - \[CapitalDelta]])/(2.*\[CapitalDelta]); derivative3rdOrder = (2.*Sin[1. + \[CapitalDelta]] + 3.*Sin[1.] - 6.*Sin[1. - \[CapitalDelta]] + Sin[1. - 2.*\[CapitalDelta]])/(6.*\[CapitalDelta]); data = Table[{h[[i]], (derivativeRight /. \[CapitalDelta] -> h[[i]]) - exact, (derivativeLeft /. \[CapitalDelta] -> h[[i]]) - exact, (derivativeCenter /. \[CapitalDelta] -> h[[i]]) - exact, (derivative3rdOrder /. \[CapitalDelta] -> h[[i]]) - exact}, {i, 1, Length[h]}]; ScientificForm[TableForm[SetPrecision[data, MachinePrecision], TableHeadings -> {None, {"h", "D+", "D", "D0", "D3"}}, TableAlignments -> Left], 5, NumberFormat -> (Row[{#1, "e", #3}] & )] --------------------- Then do SAVE AS and select HTML, then Mathematica freezes and many errors are generated, kernel seems to go into a loop. has to kill the process. I put the notebook itself and a screen shot of the error I get here: http://12000.org/tmp/export_to_html_error/ I am using version 7 on windows 7 OS, 64 bit. It was working ok before, I must have changed something. I close Mathematica, start again, same problem. I think it can't export to HTML the generated table? May be someone could try this and see if they get the same problem? thanks --Nasser