Mathematica에서 이 방정식을 예쁘게

Mathematica에서 이 방정식을 예쁘게

저는 Mathematica에 2차원 수학을 입력하고 이를 위한 라텍스 코드를 생성하는 것을 좋아합니다. 다음 표현을 시도하기 전까지는 지금까지 잘 작동했습니다.

TeXForm[HoldForm[
  S (k*L) = (4*l + 1)/
    2 (Integrate[
      LegendreP[2*l, x]*SphericalBesselJ[0, 1/2*kl*x], {x, -1, 1}])^2/
    Integrate[SphericalBesselJ[0, 1/2*kl*x]^2, {x, -1, 1}]]]

출력 라텍스는

S (k L)=\frac{(4 l+1) \left(\int_{-1}^1 P_{2 l}(x) j_0\left(\frac{\text{kl} x}{2}\right) \,
   dx\right){}^2}{2 \int_{-1}^1 j_0\left(\frac{\text{kl} x}{2}\right){}^2 \, dx}

컴파일하면 다음과 같습니다.

Mathematica 생성 코드

보시다시피 스타일 오류가 많이 있습니다(내 의견으로는). 적분 기호가 너무 작고 한계가 너무 커서 괄호가 이상하게 보입니다. ^2이(가) 올바른 위치에 있지 않은 것 같습니다. 문제는 이것을 손으로 입력하면 mathematica와 거의 동일한 코드가 나온다는 것입니다.

이 방정식을 아름답게 만드는 데 도움을 주시면 대단히 감사하겠습니다.

감사해요

답변1

\displaystyle다음은 분수의 분자와 분모 모두에 지시문을 사용하는 솔루션입니다 . (이 align구조는 순전히 전후 비교를 단순화하기 위해 사용되었습니다.)

여기에 이미지 설명을 입력하세요

\documentclass{article}
\usepackage{amsmath} % for \DeclareMathOperator macro
\DeclareMathOperator{\kl}{kl}   % what does "kl" stand for?
\DeclareMathOperator{\dee}{d\!} % "differential operator"
\begin{document}

\begin{align*}
\text{before:}\quad&
S (k L)=\frac{(4 l+1) \left(\int_{-1}^1 P_{2 l}(x) j_0\left(\frac{\text{kl} x}{2}\right) \,
   dx\right){}^2}{2 \int_{-1}^1 j_0\left(\frac{\text{kl} x}{2}\right){}^2 \, dx}\\
\text{after:}\quad&
S (k L)=\frac{\displaystyle (4 l+1) \biggl(\int_{-1}^1 P_{2 l}(x) j_0\left(\tfrac{1}{2}\kl x\right) \dee x\biggr)^2 }{\displaystyle 2 \int_{-1}^1 j_0\left(\tfrac{1}{2}\kl x\right)^2 \dee x}
\end{align*}
\end{document}

답변2

어떤 패키지가 로드되는지 제공하지 않았습니다. 나는 최소한으로 가정하고 \text를 \mathrm으로 변경해야 합니다.

여기에서 다음과 같은 큰 적분 기호를 검색하면 더 많은 정보를 찾을 수 있습니다.큰 적분 기호

지수 앞에 있는 {}를 제거하면 지수가 더 높게 배치됩니다. 나는 또한 당신이 디스플레이 수학을 찾고 있다고 가정합니다.

\documentclass[11pt]{article} 
\usepackage[utf8]{inputenc} 
\usepackage{,bigints}
\begin{document}
\[S (k L)=\frac{(4 l+1) \left(\bigintsss_{-1}^1 P_{2 l}(x) j_0\left(\frac{\mathrm{kl} x}{2}\right) \,
   dx\right)^2}{2 \bigintsss_{-1}^1 j_0\left(\frac{\mathrm{kl} x}{2}\right)^2 \, dx}\]
\end{document}

관련 정보