从 wxmaxima 转换为 LaTeX

从 wxmaxima 转换为 LaTeX

我使用 wx Maxima 打字。我真的很赶时间。有没有办法将 wxmx/wxm 文件转换为 LaTeX 或 PDF?请回答应该非常简单(即幼儿可以理解)。此外,这项工作包括长方程式和矩阵,但没有图表或表格,只有纯文本。谢谢。

答案1

1 导出

最好的方法似乎是使用wxMaxima菜单export(文件/导出)。

例子:

导出此内容方程式

结果是: 乳胶出口

如您所见,生成的代码非常复杂,并且肯定不适合手动编辑。

\documentclass[fleqn]{article}

%% Created with wxMaxima 22.04.0

\setlength{\parskip}{\medskipamount}
\setlength{\parindent}{0pt}
\usepackage{iftex}
\ifPDFTeX
  % PDFLaTeX or LaTeX 
  \usepackage[utf8]{inputenc}
  \usepackage[T1]{fontenc}
  \DeclareUnicodeCharacter{00B5}{\ensuremath{\mu}}
\else
  %  XeLaTeX or LuaLaTeX
  \usepackage{fontspec}
\fi
\usepackage{graphicx}
\usepackage{color}
\usepackage{amsmath}
\usepackage{grffile}
\usepackage{ifthen}
\newsavebox{\picturebox}
\newlength{\pictureboxwidth}
\newlength{\pictureboxheight}
\newcommand{\includeimage}[1]{
    \savebox{\picturebox}{\includegraphics{#1}}
    \settoheight{\pictureboxheight}{\usebox{\picturebox}}
    \settowidth{\pictureboxwidth}{\usebox{\picturebox}}
    \ifthenelse{\lengthtest{\pictureboxwidth > .95\linewidth}}
    {
        \includegraphics[width=.95\linewidth,height=.80\textheight,keepaspectratio]{#1}
    }
    {
        \ifthenelse{\lengthtest{\pictureboxheight>.80\textheight}}
        {
            \includegraphics[width=.95\linewidth,height=.80\textheight,keepaspectratio]{#1}
            
        }
        {
            \includegraphics{#1}
        }
    }
}
\newlength{\thislabelwidth}
\DeclareMathOperator{\abs}{abs}

\definecolor{labelcolor}{RGB}{100,0,0}

\begin{document}


\noindent
%%%%%%%%
%% INPUT:
\begin{minipage}[t]{4.000000em}\color{red}\bfseries
 --\ensuremath{\ensuremath{>}}  
\end{minipage}
\begin{minipage}[t]{\textwidth}\color{blue}
R:\ s\ /\ phi;\\
D:\ (R-x)\ *\ (1-cos(phi));
\end{minipage}
%%%% OUTPUT:
\[\displaystyle \tag{R} 
\frac{s}{phi}\mbox{}\]

\[\tag{D} 
\left( 1-\cos{(phi)}\right) \, \left( \frac{s}{phi}-x\right) \mbox{}
\]
%%%%%%%%%%%%%%%%


\noindent
%%%%%%%%
%% INPUT:
\begin{minipage}[t]{4.000000em}\color{red}\bfseries
 --\ensuremath{\ensuremath{>}}  
\end{minipage}
\begin{minipage}[t]{\textwidth}\color{blue}
trigreduce(\%);
\end{minipage}
%%%% OUTPUT:
\[\displaystyle \tag{\% o6} 
\cos{(phi)} x-x-\frac{\cos{(phi)} s}{phi}+\frac{s}{phi}\mbox{}
\]
%%%%%%%%%%%%%%%%


\noindent
%%%%%%%%
%% INPUT:
\begin{minipage}[t]{4.000000em}\color{red}\bfseries
 --\ensuremath{\ensuremath{>}}  
\end{minipage}
\begin{minipage}[t]{\textwidth}\color{blue}
factor(\%);
\end{minipage}
%%%% OUTPUT:
\[\displaystyle \tag{\% o7} 
\frac{\left( \cos{(phi)}-1\right) \, \left( phi x-s\right) }{phi}\mbox{}
\]
%%%%%%%%%%%%%%%%


\noindent
%%%%%%%%
%% INPUT:
\begin{minipage}[t]{4.000000em}\color{red}\bfseries
 --\ensuremath{\ensuremath{>}}  
\end{minipage}
\begin{minipage}[t]{\textwidth}\color{blue}
radcan(\%);
\end{minipage}
%%%% OUTPUT:
\[\displaystyle \tag{\% o8} 
\frac{\left( phi \cos{(phi)}-phi\right)  x+\left( 1-\cos{(phi)}\right)  s}{phi}\mbox{}
\]
%%%%%%%%%%%%%%%%


\noindent
%%%%%%%%
%% INPUT:
\begin{minipage}[t]{4.000000em}\color{red}\bfseries
 --\ensuremath{\ensuremath{>}}  
\end{minipage}
\begin{minipage}[t]{\textwidth}\color{blue}
delta:\ (1-cos(phi))\ *\ s/phi\ -\ (1\ -\ cos(phi)/phi);
\end{minipage}
%%%% OUTPUT:
\[\displaystyle \tag{delta} 
\frac{\left( 1-\cos{(phi)}\right)  s}{phi}+\frac{\cos{(phi)}}{phi}-1\mbox{}
\]
%%%%%%%%%%%%%%%%


\noindent
%%%%%%%%
%% INPUT:
\begin{minipage}[t]{4.000000em}\color{red}\bfseries
 --\ensuremath{\ensuremath{>}}  
\end{minipage}
\begin{minipage}[t]{\textwidth}\color{blue}
trigsimp(delta);
\end{minipage}
%%%% OUTPUT:
\[\displaystyle \tag{\% o14} 
-\frac{\left( \cos{(phi)}-1\right)  s-\cos{(phi)}+phi}{phi}\mbox{}
\]
%%%%%%%%%%%%%%%%
\end{document}

2 个列表

另外,您可以使用包listing将方程式复制到您的 Latex 编辑器中,如下所示。但是,这个仍然无法编译,因为您必须删除所有乘法点。有时它可能很有用。

(您可能想要选择除 PHP 之外的其他语言。请查看手册。)

\documentclass[10pt,a4paper]{article}
\usepackage{listings}

\begin{document}
\lstset{language=PHP,breaklines=true}
 \begin{lstlisting}
 -->    R: s / phi;
    D: (R-x) * (1-cos(phi));
(R) s/phi
(D) (1-cos(phi))(s/phi-x)
 -->    trigreduce(%);
(%o6)   cos(phi)x-x-(cos(phi) s)/phi+s/phi
 -->    factor(%);
(%o7)   ((cos(phi)-1)·(phi·x-s))/phi
 -->    radcan(%);
(%o8)   ((phi·cos(phi)-phi)x+(1-cos(phi))·s)/phi
 -->    delta: (1-cos(phi)) * s/phi - (1 - cos(phi)/phi);
(delta) ((1-cos(phi))·s)/phi+cos(phi)/phi-1
 -->    trigsimp(delta);
(%o14)  -((cos(phi)-1)·s-cos(phi)+phi)/phi 
 \end{lstlisting}

\end{document}

3 PDF

只需打印您的 wxmx 文件(文件/打印)。为此,您的系统需要安装 pdf 打印机。不知道 pdf 的质量如何。

相关内容