New answers tagged

1

The easiest workaround is to use Table[Labeled[ ListVectorPlot[data[[i]], PlotRange -> All, VectorColorFunction -> Function[{x, y, vx, vy, n}, ColorData["Rainbow"][Rescale[n, {min, max}]]], VectorColorFunctionScaling -> False, ImageSize -> 300], BarLegend[{"Rainbow", {min, max}}, ImageSize -> 300], {{Right, Center}} ...


0

Maybe if you consider the min and max of the individual tables within normTable. min=Map[Min,normData];max=Map[Max,normData]; Table[ListVectorPlot[data[[i]],PlotRange->All,PlotLegends ->BarLegend[{"Rainbow",{min[[i]],max[[i]]}}],VectorColorFunction ->Function[{x,y,vx,vy,n},ColorData["Rainbow"][Rescale[n, {min[[i]], ...


3

Use the (undocumented, afaik) options "TicksStyle" and "FrameStyle": BarLegend[{"SunsetColors", {0, 1}}, LabelStyle -> {FontSize -> 12}, "TicksStyle" -> Directive[Red, AbsoluteThickness[5]], "FrameStyle" -> Opacity[0]] In version 10, we need to add Opacity[1] in Directive[...]: BarLegend[{"SunsetColors", {0, 1}}, LabelStyle -> ...


3

Analysis (Observations in 10.1.0 under Windows.) Curiously it seems that AbsoluteThickness[0.2`] is hard-coded within the internal definitions. Formatting of BarLegend calls Charting`iBarLegend which calls Legending`LegendDump`iColorGradientLegend or Legending`LegendDump`iColorBandLegend. In the definition of iColorGradientLegend we find: ticksstyle = ...


0

For a verry nice Q & A see Using Evaluate and Evaluated -> True in Plot Plot[{{A0 E^(-k1 t) , -((A0 E^(-k1 t - k2 t) (-E^(k1 t) + E^(k2 t)) k1)/(k1 - k2)) , (A0 E^(-k1 t - k2 t) (-E^(k1 t) k1 + E^(k1 t + k2 t) k1 + E^(k2 t) k2 - E^(k1 t + k2 t) k2))/(k1 -k2)} /. {A0 -> 1, k1 -> 4, k2 -> 10}} , {t, 2, 0} , Evaluated -> True] Plot[{{A0 ...



Top 50 recent answers are included