TikZなどを使わずに関数のグラフを表すシンボル

Question

アメリカの教科書で、私がとても気に入った演習の番号の近くにこのマゼンタの記号がありましたが、これは直交座標系における関数の一般的なグラフを表しています。

調べてみたのですが、 なしでこのシンボルを生成できるパッケージはないようですTikZ-pgf。こちらは、グリッドに曲線を入れない私の MWE です。

\documentclass[a4paper,12pt]{article}
\usepackage{xcolor}
\usepackage{amssymb}
\usepackage{relsize}
\begin{document}
$\textcolor{magenta}{\mathlarger{\boxplus}}$
\end{document}

シンボルに重なる曲線のシンボルが見つかりません。

Answer 1

以下を使用できますpict2e:

\documentclass{article}
\usepackage{xcolor,pict2e}

\newcommand{\usegraph}{%
  \begingroup\setlength{\unitlength}{0.16pt}%
  \begin{picture}(100,100)
  \color{magenta}
  \polygon(0,0)(100,0)(100,100)(0,100)
  \Line(50,0)(50,100)
  \Line(0,50)(100,50)
  \cbezier(0,0)(60,200)(40,0)(100,100)
  \end{picture}%
  \endgroup
}

\begin{document}

\usegraph

\end{document}

曲線が太いバージョン:

\documentclass{article}
\usepackage{xcolor,pict2e}

\newcommand{\usegraph}{%
  \begingroup\setlength{\unitlength}{0.16pt}%
  \begin{picture}(100,100)
  \color{magenta}
  \polygon(0,0)(100,0)(100,100)(0,100)
  \Line(50,0)(50,100)
  \Line(0,50)(100,50)
  \linethickness{0.8pt}
  \cbezier(1,0)(60,200)(40,0)(99,100)
  \end{picture}%
  \endgroup
}

\begin{document}

\usegraph

\end{document}

（かなり新しい）l3drawパッケージ付き。

\documentclass{article}
\usepackage{xparse,l3draw,xcolor}

\ExplSyntaxOn

\NewDocumentCommand{\usegraph}{O{16pt}}
 {
  \raisebox{0pt}[#1][0pt]{\color{magenta}\egreg_usegraph:n { #1 }}
 }

\dim_new:N \l__egreg_usegraph_size_dim

\cs_new_protected:Nn \egreg_usegraph:n
 {
  \dim_set:Nn \l__egreg_usegraph_size_dim { #1 }
  \draw_begin:
  \draw_linewidth:n { 0.025*(#1) }
  \draw_path_moveto:n { 0\l__egreg_usegraph_size_dim , 0\l__egreg_usegraph_size_dim }
  \draw_path_lineto:n { 1\l__egreg_usegraph_size_dim , 0\l__egreg_usegraph_size_dim }
  \draw_path_lineto:n { 1\l__egreg_usegraph_size_dim , 1\l__egreg_usegraph_size_dim }
  \draw_path_lineto:n { 0\l__egreg_usegraph_size_dim , 1\l__egreg_usegraph_size_dim }
  \draw_path_close:
  \draw_path_use_clear:n { stroke }
  \draw_path_moveto:n { 0.5\l__egreg_usegraph_size_dim , 0\l__egreg_usegraph_size_dim }
  \draw_path_lineto:n { 0.5\l__egreg_usegraph_size_dim , 1\l__egreg_usegraph_size_dim }
  \draw_path_use_clear:n { stroke }
  \draw_path_moveto:n { 0\l__egreg_usegraph_size_dim , 0.5\l__egreg_usegraph_size_dim }
  \draw_path_lineto:n { 1\l__egreg_usegraph_size_dim , 0.5\l__egreg_usegraph_size_dim }
  \draw_path_use_clear:n { stroke }
  \draw_linewidth:n { 0.05*(#1) }
  \draw_path_moveto:n { 0.01\l__egreg_usegraph_size_dim , 0\l__egreg_usegraph_size_dim }
  \draw_path_curveto:nnn 
    { 0.6\l__egreg_usegraph_size_dim , 2\l__egreg_usegraph_size_dim }
    { 0.4\l__egreg_usegraph_size_dim , 0\l__egreg_usegraph_size_dim }
    { 0.99\l__egreg_usegraph_size_dim , 1\l__egreg_usegraph_size_dim }
  \draw_path_use_clear:n { stroke }
  \draw_end:
 }

\ExplSyntaxOff

\begin{document}

\usegraph\quad\usegraph[1em]\quad\usegraph[30pt]

\end{document}