styles/ggplot.Style.ps1
|
# ggplot2 default gray style # https://github.com/tidyverse/ggplot2/blob/master/R/theme-defaults.r Set-StrictMode -Version 3 $baseSize = 11.0 $baseLineSize = $baseSize / 22 $baseRectSize = $baseSize / 22 $halfLine = $baseSize / 2 $config = @{ # Color scheme "[DefaultColorScheme]" = "ggplot" # Default "PlotModel.DefaultFontSize" = "$($baseSize)pt" # PlotArea "PlotModel.PlotAreaBackground" = "#E5E5E5" "PlotModel.PlotAreaBorderThickness" = 0 "PlotModel.TitleFontSize" = "$($baseSize * 1.2)pt" "PlotModel.SubtitleFontSize" = "$($baseSize * 0.9)pt" # Legend "PlotModel.LegendPosition" = "RightMiddle" "PlotModel.LegendPlacement" = "Outside" "PlotModel.LegendBorder" = "gray" "PlotModel.LegendBorderThickness" = "1px" "PlotModel.LegendTitleFontSize" = "$($baseSize)pt" "PlotModel.LegendTitleFontWeight" = 800 "PlotModel.LegendFontSize" = "$($baseSize)pt" "PlotModel.LegendLineSpacing" = "$($baseLineSize)pt" # *Axis: Tick "*Axis.TickStyle" = "Outside" "*Axis.TicklineColor" = "#4D4D4D" "*Axis.TextColor" = "#4D4D4D" "*Axis.FontSize" = "$($baseSize * 0.8)pt" # *Axis: MinorTick "*Axis.MinorTickSize" = 0 # *Axis: MajorGridline "*Axis.MajorGridlineStyle" = "Solid" "*Axis.MajorGridlineColor" = "White" "*Axis.MajorGridlineThickness" = "1px" # *Axis: MinorGridline "*Axis.MinorGridlineStyle" = "Solid" "*Axis.MinorGridlineColor" = "#F0F0F0" "*Axis.MinorGridlineThickness" = "1px" # *Axis: Title "*Axis.TitleFontSize" = "$($baseSize * 1.2)pt" "*Axis.TitleColor" = "#4D4D4D" "*Axis.AxisTitleDistance" = "$($baseSize * 2)pt" # CategoryAxis: FontSize "CategoryAxis.FontSize" = "$($baseSize)pt" # Scatter*Series "Scatter*Series.MarkerType" = "Diamond" "Scatter*Series.MarkerSize" = "3px" # BoxPlotSeries "BoxPlotSeries.BoxWidth" = .6 "BoxPlotSeries.StrokeThickness" = "2pt" "BoxPlotSeries.WhiskerWidth" = 0 "BoxPlotSeries.OutlierSize" = "3pt" # CandleStickAndVolumeSeries "CandleStickAndVolumeSeries.VolumeStyle" = "Stacked" # VolumeSeries "VolumeSeries.VolumeStyle" = "Stacked" # ErrorColumnSeries "ErrorColumnSeries.StrokeColor" = "gray" # PieSeries "PieSeries.StartAngle" = -90 "PieSeries.Diameter" = 0.75 "PieSeries.InnerDiameter" = 0.35 "PieSeries.AreInsideLabelsAngled" = $true # IntervalBarSeries "IntervalBarSeries.StrokeThickness" = 0 "IntervalBarSeries.TextColor" = "white" # RectangleBarSeries "RectangleBarSeries.StrokeThickness" = 0 # TornadobarSeries "TornadoBarSeries.StrokeThickness" = 0 # AreaSeries "AreaSeries.StrokeThickness" = 0 # TwoColorAreaSeries "TwoColorAreaSeries.StrokeThickness" = 0 # Event hook # "[BeforeRendering]" = { # param($m) # if ($m.DefaultColors.Count -eq 0 -and $m.Series.Count -gt 0) { # $n = $m.Series.Count # if ($n -eq 1) { # if ($m.Series[0] -is [OxyPlot.Series.PieSeries]) { # $m.DefaultColors = (Get-OxyPalette RHue $m.Series[0].Slices.Count).Colors # } # else { # $m.DefaultColors = [OxyPlot.OxyColor[]]@([OxyPlot.OxyColors]::Black) # } # } # else { # $m.DefaultColors = (Get-OxyPalette RHue $n).Colors # } # } # } } Add-OxyStyle ggplot $config -BaseStyle vanilla |