GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it
1[1X3 [33X[0;0YThe colors in the [5XIntPic[105X[101X[1X package[133X[101X23[33X[0;0YThe idea in what concerns the colors is the following: the reader is free to4choose his colors (taking into account that the latex [5Xxcolor[105X package is5used), but we try to make users life reasonably easy. He is allowed to6choose tones. The default colors used by [5XIntPic[105X are not many, although (from7our experience) sufficient for most examples.[133X8910[1X3.1 [33X[0;0YColors by tones[133X[101X1112[33X[0;0YThe colors are divided by tones.[133X1314[4X[32X red [32X[104X15[4Xgap> IP_ColorsRedTones; #red[104X16[4X[ "red", "red!50", "red!20", "red!80!green!50", "red!80!blue!60" ][104X17[4X[32X[104X1819[4X[32X green [32X[104X20[4Xgap> IP_ColorsGreenTones; #green[104X21[4X[ "green", "green!50", "green!20", "green!80!red!50", "green!80!blue!60" ][104X22[4X[32X[104X2324[4X[32X blue [32X[104X25[4Xgap> IP_ColorsBlueTones; #blue[104X26[4X[ "blue", "blue!50", "blue!20", "blue!80!red!50", "blue!80!green!60" ][104X27[4X[32X[104X2829[4X[32X cyan [32X[104X30[4Xgap> IP_ColorsCompRedTones; # cyan (complement of red)[104X31[4X[ "-red", "-red!50", "-red!20", "-red!80!green!50", "-red!80!blue!60" ][104X32[4X[32X[104X3334[4X[32X magenta [32X[104X35[4Xgap> IP_ColorsCompGreenTones; # magenta (complement of green)[104X36[4X[ "-green", "-green!50", "-green!20", "-green!80!red!50", "-green!80!blue!60" [104X37[4X ][104X38[4X[32X[104X3940[4X[32X yellow [32X[104X41[4Xgap> IP_ColorsCompBlueTones; # yellow (complement of blue)[104X42[4X[ "-blue", "-blue!50", "-blue!20", "-blue!80!red!50", "-blue!80!green!60" ][104X43[4X[32X[104X4445[4X[32X dark gray [32X[104X46[4Xgap> IP_ColorsDGrayTones; # dark gray[104X47[4X[ "black!80", "black!70", "black!60", "black!50", "black!40" ][104X48[4X[32X[104X4950[4X[32X light gray [32X[104X51[4Xgap> IP_ColorsLGrayTones; # light gray[104X52[4X[ "black!30", "black!25", "black!20", "black!15", "black!10" ][104X53[4X[32X[104X545556[1X3.2 [33X[0;0YLists of colors[133X[101X5758[4X[32X array of colors by tones [32X[104X59[4Xgap> ListsOfIP_Colors;[104X60[4X[ [ "red", "red!50", "red!20", "red!80!green!50", "red!80!blue!60" ], [104X61[4X [ "green", "green!50", "green!20", "green!80!red!50", "green!80!blue!60" ], [104X62[4X [ "blue", "blue!50", "blue!20", "blue!80!red!50", "blue!80!green!60" ], [104X63[4X [ "-red", "-red!50", "-red!20", "-red!80!green!50", "-red!80!blue!60" ], [104X64[4X [ "-green", "-green!50", "-green!20", "-green!80!red!50", [104X65[4X "-green!80!blue!60" ], [104X66[4X [ "-blue", "-blue!50", "-blue!20", "-blue!80!red!50", "-blue!80!green!60" ],[104X67[4X [ "black!80", "black!70", "black!60", "black!50", "black!40" ], [104X68[4X [ "black!30", "black!25", "black!20", "black!15", "black!10" ] ][104X69[4X[32X[104X7071[4X[32X list of colors by tones [32X[104X72[4Xgap> IP_Colors;[104X73[4X[ "red", "red!50", "red!20", "red!80!green!50", "red!80!blue!60", "green", [104X74[4X "green!50", "green!20", "green!80!red!50", "green!80!blue!60", "blue", [104X75[4X "blue!50", "blue!20", "blue!80!red!50", "blue!80!green!60", "-red", [104X76[4X "-red!50", "-red!20", "-red!80!green!50", "-red!80!blue!60", "-green", [104X77[4X "-green!50", "-green!20", "-green!80!red!50", "-green!80!blue!60", "-blue", [104X78[4X "-blue!50", "-blue!20", "-blue!80!red!50", "-blue!80!green!60", "black!80", [104X79[4X "black!70", "black!60", "black!50", "black!40", "black!30", "black!25", [104X80[4X "black!20", "black!15", "black!10" ][104X81[4X[32X[104X828384[1X3.3 [33X[0;0YThe [5XIntPic[105X[101X[1X default list of colors[133X[101X8586[33X[0;0YThe colors are shuffled by concatenating the transposed of the matrix87[10XListsOfIP_Colors[110X. The list obtained is taken as the default list of colors.[133X8889[4X[32X default list of colors [32X[104X90[4Xgap> ShuffledIP_colors;[104X91[4X[ "red", "green", "blue", "-red", "-green", "-blue", "black!80", "black!30", [104X92[4X "red!50", "green!50", "blue!50", "-red!50", "-green!50", "-blue!50", [104X93[4X "black!70", "black!25", "red!20", "green!20", "blue!20", "-red!20", [104X94[4X "-green!20", "-blue!20", "black!60", "black!20", "red!80!green!50", [104X95[4X "green!80!red!50", "blue!80!red!50", "-red!80!green!50", "-green!80!red!50",[104X96[4X "-blue!80!red!50", "black!50", "black!15", "red!80!blue!60", [104X97[4X "green!80!blue!60", "blue!80!green!60", "-red!80!blue!60", [104X98[4X "-green!80!blue!60", "-blue!80!green!60", "black!40", "black!10" ][104X99[4X[32X[104X100101[33X[0;0YThese are the [5XIntPic[105X default colors. Although the user is free to use other102colors, we warn that there is a need of compatibility with the colors used103in other packages (the LaTeX [5Xxcolor[105X, for instance). To emphasize the104integers of some sets by using some of the colors in some list of colors105(for instance the default colors) one may use empty lists to force the non106usage of the colors whose order in the list of colors is the order of these107empty lists in the array of integers to be emphasized.[133X108109[4X[32X Example [32X[104X110[4X[25Xgap>[125X [27Xm3 := Filtered([1..40],i->i mod 3=0);[127X[104X111[4X[28X[ 3, 6, 9, 12, 15, 18, 21, 24, 27, 30, 33, 36, 39 ][128X[104X112[4X[25Xgap>[125X [27Xm5 := Filtered([1..40],i->i mod 5=0);[127X[104X113[4X[28X[ 5, 10, 15, 20, 25, 30, 35, 40 ][128X[104X114[4X[25Xgap>[125X [27Xm7 := Filtered([1..40],i->i mod 7=0);[127X[104X115[4X[28X[ 7, 14, 21, 28, 35 ][128X[104X116[4X[25Xgap>[125X [27X[127X[104X117[4X[25Xgap>[125X [27Xarr := [[],[],m3,[],m5,[],m7];;[127X[104X118[4X[25Xgap>[125X [27Xtkz:=IP_TikzArrayOfIntegers([1..40],10,rec(highlights:=arr));;[127X[104X119[4X[32X[104X120121122[1X3.4 [33X[0;0YFunctions to deal with colors[133X[101X123124[33X[0;0YFor the moment we only provide one function, which shuffles colors from125lists of colors.[133X126127128[1X3.4-1 [33X[0;0YShuffle colors from lists of colors[133X[101X129130[29X[2XShuffleIP_Colors[102X( [3Xmat[103X ) [32X function131132[33X[0;0YThe argument [3Xmat[103X is a list of lists of colors of the same length. The output133is obtained by concatenating the transposed of [3Xmat[103X.[133X134135[4X[32X Example [32X[104X136[4X[25Xgap>[125X [27XShuffleIP_Colors([IP_ColorsRedTones,IP_ColorsCompBlueTones]);[127X[104X137[4X[28X[ "red", "-blue", "red!50", "-blue!50", "red!20", "-blue!20", [128X[104X138[4X[28X "red!80!green!50", "-blue!80!red!50", "red!80!blue!60", "-blue!80!green!60" [128X[104X139[4X[28X ][128X[104X140[4X[32X[104X141142143144