SHARE
TWEET

Untitled

a guest Dec 5th, 2012 46 Never
  1. plotData = BoxWhiskerChart[listData,
  2.   {"Notched",
  3.    {"MedianMarker", 1, Directive[Thick, White]},
  4.    {"Fences", 1, Black},
  5.    {"Whiskers", Black},
  6.    {"Outliers", "x", Black},
  7.    {"FarOutliers", "x", Gray}
  8.    
  9.    
  10.    },
  11.   (*ScalingFunctions->"Log",*)
  12.   Frame -> {{True, False}, {True, False}},
  13.   PlotLabel -> Style["Box Plot of Some Data", Bold, "Calibri", 16],
  14.   FrameLabel -> {Style["Time", FontFamily -> "Arial", 12], Style["Value", FontFamily -> "Arial", 12]},
  15.   LabelStyle -> Directive[Bold, FontFamily -> "Calibri", 12],
  16.  
  17.   ChartStyle -> Gray,
  18.   PlotRange -> {0, 1.6}
  19.  
  20.   ]
RAW Paste Data
Top