Wolfram Mathematica to Latex - массив, не полностью сохраняющий точность

Question

У меня есть набор данных, которые я разместил в массиве в пределах mathematica. Значение энергии должно быть, как показано ниже, при копировании в формате LaTex:

Theta Phi энергии (Хартри)

1,5329 & -1,5708 & -2775,20972374594 \\

1,53476 & -1.25646 & - +2775,209669993 \\

1,54014 & -0,942167 & -2775,20947403366 \\

Что я на самом деле получаю, когда я копирую:

1,5329 & -1,5708 & -2775,21 \\

1,53476 & -1,25646 & -2775,21 \\

1,54014 & -0,942167 & -2775.21 \\

Я сделал несколько наборов данных и получил работу для всех, кроме одного. Кажется, есть набор из 100 пунктов, которые усекаются. Я попытался следующий код:

PESdatatable316 = {{"Theta", "Phi", "Energy(Hartree)"}}; 

Do[ 
PESdatatable316 = Append[PESdatatable316, {th316[[i]], phi316[[i]], NumberForm[energies316[[i]], 15]}], {i, 1, 30}] 

TableForm[PESdatatable316] 

где:

energies316 = Flatten[{energies100,energies216},1] 

Проблема, кажется, в 'energies100'. Значения были введены с 12 цифрами, но обрезаются до 6, когда я вызываю значения.

Пример:

energies100 [[1]]

будет выводить:

-2775,21

'NumberForm' корректирует значения в пределах mathematica, но когда я копирую LaTex форма возвращается к укороченным значениям.

Любые идеи о том, как я могу получить эти ценности, какими они должны быть?

Answer 1

Решение было найдено:

использование «TeXForm» с вложенными внутри результатов, на «» NumberForm в правильной точностью и могут быть скопированы без каких-либо проблем, возникающих.