New answers tagged

5

Although Chip's answer already suffices to address the question, I would like to quote here a relevant part of the dialog by Theo Gray and Jerry Glynn in their book Exploring Mathematics with Mathematica; as there does not seem to be an easily accessible online version or preview of the book anywhere, I hope the quotation is useful: … Theo: ...


2

I am going to copy-paste Simon Wood's answer of How to create a new “person curve”? param[x_, m_, t_] := Module[{f, n = Length[x], nf}, f = Chop[Fourier[x]][[;; Ceiling[Length[x]/2]]]; nf = Length[f]; Total[Rationalize[2 Abs[f]/Sqrt[n] Sin[Pi/2 - Arg[f] + 2. Pi Range[0, nf - 1] t], .01][[;; Min[m, nf]]]]] tocurve[Line[data_], m_, t_] := ...


3

Use Text in Graphics. This page, and the ones linked under Tutorial (top right corner) explain how to type math. Here's one way, keystroke by keystroke: ", a, ", ←, shift+←, control+shift+T, ←, control+7, ~ or ^ Copyable example: Graphics[Text["\!\(\*FormBox[OverscriptBox[\(a\), \(^\)], TraditionalForm]\)", {0, 0}]] It'll format fine when you paste ...



Top 50 recent answers are included