ploterific 0.2.1.3 → 0.2.1.4
raw patch · 2 files changed
+9/−7 lines, 2 files
Files
- ploterific.cabal +3/−3
- src/Ploterific/Plot/Plot.hs +6/−4
ploterific.cabal view
@@ -1,13 +1,13 @@ name: ploterific-version: 0.2.1.3+version: 0.2.1.4 synopsis: Basic plotting of tabular data for the command line. description: A quick and easy way to plot tabular data from the command line. Meant for quick visualizations, not too customizable. homepage: http://github.com/GregorySchwartz/ploterific#readme license: GPL-3 license-file: LICENSE author: Gregory W. Schwartz-maintainer: gsch@pennmedicine.upenn.edu-copyright: 2021 Gregory W. Schwartz+maintainer: gregory.schwartz@uhnresearch.ca+copyright: 2022 Gregory W. Schwartz category: Bioinformatics build-type: Simple -- extra-source-files:
src/Ploterific/Plot/Plot.hs view
@@ -134,16 +134,18 @@ fmap (T.pack . sRGB24show) . colorRamp (length labels) . brewerSet Set1 $ 9 -- | Get the encoding.-enc :: Maybe (Color, [ColorLabel])+enc :: DefaultTheme+ -> Maybe (Color, [ColorLabel]) -> [Feature] -> [VL.EncodingSpec] -> VL.PropertySpec-enc colorInfo fs =+enc defaultTheme' colorInfo fs = VL.encoding . maybe id (\ (Color c, ls)- -> VL.color ( [VL.MName . getColName $ c, labelColorScale ls]+ -> VL.color ( [VL.MName . getColName $ c]+ <> bool [labelColorScale ls] [] (unDefaultTheme defaultTheme') <> maybe [] (\x -> [VL.MmType x]) (getColMeasurement c) ) )@@ -208,7 +210,7 @@ $ [VL.FName . getColName $ x] <> maybe [] (\y -> [VL.FmType y]) (getColMeasurement x) ]- plotSpec = [ enc colorInfo features' []+ plotSpec = [ enc defaultTheme' colorInfo features' [] , VL.mark mark' [] , VL.selection . VL.select "view" VL.Interval [VL.BindScales] $ []