วิธีทำ 6 ขั้นตอน รันตามลำดับในหนึ่งเซสชัน ทุกขั้นถูกรันกับเอนจินจริง และเอาต์พุตด้านล่างคือสิ่งที่มันให้
Plot[Sin[x], {x, 0, 22}, PlotLabel -> "sin(x)"]-Graphics-Plot[Sin[x], {x, 0, 22}, PlotLabel -> Style["sin(x)", FontSize -> 18]]-Graphics-Plot[Sin[x], {x, 0, 22}, PlotLabel -> Style["sin(x)", FontSize -> 18], Background -> StandardYellow]-Graphics-Labeled[Plot[Sin[x], {x, 0, 22}], "sin(x)"]Labeled[-Graphics-, sin(x)]Labeled[Plot[Sin[x], {x, 0, 22}], Style["sin(x)", "Graphics"]]Labeled[-Graphics-, sin(x)]Labeled[Plot[Sin[x], {x, 0, 22}], Style["sin(x)", "Graphics"], Background -> StandardYellow]Labeled[-Graphics-, sin(x), Background -> StandardYellow]สูตรงานทั้งหมด · เอกสารอ้างอิงฟังก์ชัน · ใช้สิ่งนี้จากไคลเอนต์ MCP