The short answer is that, yes, it definitely is feasible. The most basic approach is to use the `"BoxRules"`

option of `Export[_,"TeX",___]`

to generate the TeX color commands. To do this with your example, we might use the following `BoxRules`

function:

```
Clear[myBoxRule];
myBoxRule[s_String] := s;
myBoxRule[RowBox[stuff_List, ___]] := StringJoin[myBoxRule /@ stuff];
myBoxRule[FractionBox[numerator_String, denominator_]] :=
"\\frac{" <> numerator <> "}{" <> myBoxRule[denominator] <> "}";
myBoxRule[StyleBox[s_String, fColor_RGBColor, opts___]] :=
"\\color[rgb]" <> latexColor[fColor] <> s <> "}";
myBoxRule[StyleBox[stuff_RowBox, fColor_RGBColor, opts___]] :=
"\\color[rgb]" <> latexColor[fColor] <> myBoxRule[stuff] <> "}";
```

We can apply this to an example like yours as follows. (I modified your example a bit to emphasize the nested structure.)

```
SeedRandom[2];
expr = Nest[1 + 1/Style[#,
RGBColor[Random[], Random[], Random[]]] &,
x, 5];
ExportString[expr, "TeX", "UsePackages" -> {"color"}, "BoxRules" ->
{box : (_StyleBox | _RowBox | _FractionBox) :> myBoxRule[box]}]
(* Out:
%% AMS-LaTeX Created by Wolfram Mathematica 9.0 : www.wolfram.com
\documentclass{article}
\usepackage{color}
\newcommand{\mathsym}[1]{{}}
\newcommand{\unicode}[1]{{}}
\newcounter{mathematicapage}
\begin{document}
\[1+\frac{1}{\color[rgb]{0.902785,0.672727,0.419794}{1+\frac{1}{\color[rgb]{0.632356,0.0725195,0.251276}{1+\frac{1}{\color[rgb]{0.529257,0.0507012,0.74907}{1+\frac{1}{\color[rgb]{0.421515,0.512692,0.0228035}{1+\frac{1}{\color[rgb]{0.238705,0.844529,0.473928}{x}}}}}}}}}}\]
\end{document}
*)
```

The TeXed output looks like so:

This does *not* seem to work with MathJaX on this site. It's possible that the color package simply isn't installed.

Nice--! Bad thing is I cannot download your NB files. :( How about inline cells, This is good,

`ExportString[Sqrt[3],"TeX","BoxRules" -> {SqrtBox[x_]:>x<>"^(1/2)"}]`

,but this is failed,`ExportString[Cell[Sqrt[3]],"TeX","BoxRules" -> {SqrtBox[x_]:>x<>"^(1/2)"}]`

, how to deal with this case? – HyperGroups – 2013-06-30T03:07:40.0501@HyperGroups I just tested the links and they work as far as I can tell. Why can't you download them? I think your second

`ExportString`

doesn't work because you don't have a well formed Cell.`ExportString[Cell[Sqrt[3]],"TeX"]`

fails to produce useful TeX as well, so it's not the`BoxRules`

. The notebooks contain code that deal with this situation. – Mark McClure – 2013-06-30T03:58:01.790Fine, I'll do more tests. Maybe because my country filtered some other countries' websites, such like

`wordpress`

...and more... so I cannot download. – HyperGroups – 2013-06-30T04:17:51.917