8.16.0.1
Colorblind Palette
(require colorblind-palette) | package: colorblind-palette |
Lists of colorblind friendly colors.
Inspiration: https://davidmathlogic.com/colorblind
Examples:
> (require pict pict-abbrevs colorblind-palette)
> (ptable #:ncols 2 (for/list ((color* (in-list (list ibm-palette* wong-palette* tol-palette*))) (lbl (in-list '(ibm wong tol)))) (list (text (symbol->string lbl) (cons 'bold 'roman) 14) (apply ht-append 2 (for/list (((color idx) (in-indexed color*))) (vc-append 2 (filled-rectangle 50 50 #:color color) (text (number->string idx) 'modern 14)))))))
value
value
value