Wolfram mathematica Mathematica中绘图工具的CMYK颜色
我在Mathematica 9.0中绘制图形,并将所有颜色转换为CMYK。之后,我使用“绘图工具”选项板添加了文本和其他信息。我希望这个东西也是CMYK的颜色,但找不到改变它的方法。我现在正在使用一个演示版本,看看这是否适用于我们的出版物 谢谢 [稍后] 谢谢,这很有帮助。我正在为我们的办公室制作一个“虚拟证明”模板,但我的函数箭头的颜色似乎与我导出到pdf之类的东西时的函数颜色不同。我想要一种手动控制箭头颜色的方法,但似乎找不到这样写的方法。我也不介意将箭头样式更改为仅两条线而不是实心形状。箭头是最后一行Wolfram mathematica Mathematica中绘图工具的CMYK颜色,wolfram-mathematica,cmyk,Wolfram Mathematica,Cmyk,我在Mathematica 9.0中绘制图形,并将所有颜色转换为CMYK。之后,我使用“绘图工具”选项板添加了文本和其他信息。我希望这个东西也是CMYK的颜色,但找不到改变它的方法。我现在正在使用一个演示版本,看看这是否适用于我们的出版物 谢谢 [稍后] 谢谢,这很有帮助。我正在为我们的办公室制作一个“虚拟证明”模板,但我的函数箭头的颜色似乎与我导出到pdf之类的东西时的函数颜色不同。我想要一种手动控制箭头颜色的方法,但似乎找不到这样写的方法。我也不介意将箭头样式更改为仅两条线而不是实心形状。箭
ClearAll["Global`*"];
Interpretation[{f = { 1/(x - 1) + 1, Sin[x], -x, x},
points = {{3, 2}, {-5, -8}}, min = -10, max = 10, size = 0.5,
rmin = -10, rmax = 10, gridx = 1, gridy = 1, hlabel = "x",
vlabel = "y"},
Panel[Grid[{{Style["Plot Characteristics", Bold], SpanFromLeft},
{"Functions:", InputField[Dynamic[f]]},
{"Points:", InputField[Dynamic[points]]},
{"Domain Min:", InputField[Dynamic[min]]},
{"Domain Max:", InputField[Dynamic[max]]},
{"Range Min:", InputField[Dynamic[rmin]]},
{"Range Max:", InputField[Dynamic[rmax]]},
{"Grid Size (cm):", InputField[Dynamic[size]]},
{"Gridline Space x:", InputField[Dynamic[gridx]]},
{"Grdiline Space y:", InputField[Dynamic[gridy]]},
{"Horizontal Label:", InputField[Dynamic[hlabel]]},
{"Vertical Label:", InputField[Dynamic[vlabel]]}
}]],
Plot[f, {x, min - 0.58*gridx, max + 0.58*gridx},
PlotRange -> {rmin - 1.01*gridy, rmax + 1.01 gridy} ,
GridLines -> {Range[min, max, gridx], Range[rmin, rmax, gridy]},
GridLinesStyle -> {{Dashed, CMYKColor[0, 0, 0, 1, 0.25],
AbsoluteThickness[0.5]}, {Dashed, CMYKColor[0, 0, 0, 1, 0.25],
AbsoluteThickness[0.5]}},
Ticks -> {Range[min, max, gridx], Range[rmin, rmax, gridy]},
TicksStyle ->
Directive[10, Opacity[0], FontOpacity -> 0.9999,
CMYKColor[0, 0, 0, 1], FontFamily -> "Helvetica"],
ImageSize -> {(max + gridx - (min - gridx))*28.52*size + 37.2 +
6.4*StringLength[hlabel], (rmax + gridy - (rmin - gridy))*28.52*
size + 49},
AspectRatio -> Full,
AxesLabel -> {Style[hlabel, Italic], Style[vlabel, Italic]},
LabelStyle -> {{FontFamily -> "Helvetica", FontSize -> 14}},
AxesStyle -> {CMYKColor[1, 1, 1, 1], AbsoluteThickness[0.5]},
PlotStyle -> {{AbsoluteThickness[1],
CMYKColor[0, 0, 0, 1]}, {AbsoluteThickness[1],
CMYKColor[0, 0.83, 1, 0]}, {AbsoluteThickness[1],
CMYKColor[1, 0, 0, 0]}, {AbsoluteThickness[1],
CMYKColor[0.36, 1, 0, 0]}, {AbsoluteThickness[1],
CMYKColor[0.63, 0, 1, 0]}, {AbsoluteThickness[1],
CMYKColor[0, 0, 0, 1]}},
Prolog -> {Arrowheads[{0.02, 0.01, {0, 0.03}}],
Arrow[{{max + gridx, 0}, {max + gridx + gridx/10, 0}}],
Arrow[{{min - gridx, 0}, {min - gridx - gridx/10, 0}}],
Arrow[{{0, rmax + gridy}, {0, rmax + gridy + gridy/10}}],
Arrow[{{0, rmin - gridy}, {0, rmin - gridy - gridy/10}}],
AbsolutePointSize[5], Point[points]},
Epilog -> {Text[
Style["Label", 12, FontColor -> CMYKColor[0, 0, 0, 1],
FontFamily -> "Helvetica"], {5, 5}]}
]
/. Line[x__] :> Sequence[Arrowheads[{-.02, .02}], Arrow[x]]
]
如果有帮助的话,这里是如何获得CMYK颜色的RGB等价物
ColorConvert[ CMYKColor[0, 1, 1, 0] , "RGB"] /. RGBColor -> List
(* {1., 0., 0.} *)
或在对话框的适当范围内:
255 ( ColorConvert[ CMYKColor[.1, .8, .3, .15] , "RGB"] /. RGBColor -> List) // Round
(* {195, 43, 152} *)
我觉得您需要手动将它们输入到“绘图工具”对话框中
当然,您可以始终使用图形工具而不是GUI工具进行标记,这样您就可以完全控制
编辑//只是把这件事搞砸了。我可以很好地将绘图工具对象的颜色匹配到CMYK,但字体除外。字体颜色显然可以通过“字体”对话框或“绘图工具”对话框进行设置,但这两个对话框对我来说都没有任何意义。
我认为我们可以将GUI绘图工具标记为不适合高质量工作。我不认为我对您的方法感兴趣-首先,如果您再次生成图形,您不需要重新进行注释吗?然后,你用手来做一些你可能更容易自动化的事情(如果你有很多这类工作要做…)。尽管通过Mathematica学习做任何事情都需要一些时间 这似乎可以在导出时保留CMYK颜色:
p = Framed[
Plot[
Sin[x],
{x, 0, 2 Pi},
PlotStyle -> CMYKColor[0, 1, 0, .15],
PlotRangePadding -> 0,
Prolog -> {CMYKColor[.1, .1, .3, .15],
Rectangle[{-1, -1}, {2 Pi, 1}]},
Epilog -> {Text[
Style["Sine of x", 28,
FontColor -> CMYKColor[.2, .5, 1, .15],
FontFamily -> "Optima Bold"],
{4.5, .5}]}],
Background -> CMYKColor[.3, .2, .0, .15],
FrameStyle -> CMYKColor[.1, .2, .0, 0]
]
Export["p.eps", p]
但是我已经有一段时间没有和CMYK合作了,所以我可能不知道我在做什么了……:)谢谢,这很有帮助。我正在为我们的办公室制作一个“虚拟校样”模板,我想除了我的功能箭头之外,我已经找到了所有的颜色。当我将其导出为PDF格式时,它们的颜色与函数的颜色不同。这是我的。我似乎无法改变箭头的颜色。现在这是一个完全不同的问题…:)我建议将问题简化到尽可能少的代码来演示问题,然后继续提问。如果没有其他问题,您可以回答一些问题!:)谢谢,我在那里试试。