« first day (4589 days earlier)      last day (38 days later) » 

minhthien_2016
minhthien_2016
2:46 PM
@Nasser I have a list of coefficients of parabola $y = a x^2 + bx + c$. I have two tables of variant with $a > 0$ and $a<0$. How can I use this tables to data = {{1, 2, -3, -1, 0}, {-3, 2, -1, 1/3, 5/27}};
@Nasser Clear["Global`*"];
SetDirectory[NotebookDirectory[]]
f[x_] = a x^2 + b x + c;
data = {{1, 2, -3, -1, 0}, {-3, 2, -1, 1/3, 5/27}};
rep[s_String] := StringReplace[s, "," -> ";"];
toX[e_] :=
StringReplace[
ToString[TeXForm[e]], {"\\frac" -> "\\dfrac", "\\}" -> ")",
"\\{" -> "("}]
fileName = FileNameJoin[{Directory[], "parabol_thu_may.tex"}]
If[FileExistsQ[fileName], DeleteFile[fileName]];
file = OpenWrite[fileName, PageWidth -> Infinity,
CharacterEncoding -> "UTF-8"];
WriteString[file,
"\\documentclass[12pt,a4paper]{article}\n" <>

« first day (4589 days earlier)      last day (38 days later) »