viridisLite/0000755000177500001440000000000013065130212013052 5ustar deepayanusersviridisLite/tests/0000755000177500001440000000000013065002376014225 5ustar deepayanusersviridisLite/tests/testthat.R0000644000177500001440000000010213065002376016201 0ustar deepayanuserslibrary(testthat) library(viridisLite) test_check("viridisLite") viridisLite/tests/testthat/0000755000177500001440000000000013065130212016054 5ustar deepayanusersviridisLite/tests/testthat/test-palettes.R0000644000177500001440000000470113065002376021010 0ustar deepayanuserscontext("palette generation") test_that("palette generation is accurate", { # data is intact expect_equal(dim(viridis.map), c(1024, 4)) # options work as expected expect_equal(viridis(1, option = "D"), "#440154FF") expect_equal(viridis(1, alpha = 0, option = "D"), "#44015400") expect_equal(viridis(1, begin = 1, end = 0, option = "D"), "#FDE725FF") expect_equal(viridis(1, alpha = 0, begin = 1, end = 0, option = "D"), "#FDE72500") expect_equal(viridis(2, alpha = 0, begin = 1, end = 0, direction = -1, option = "D"), c("#44015400", "#FDE72500")) # options work as expected expect_equal(viridis(1, option = "C"), "#0D0887FF") expect_equal(viridis(1, alpha = 0, option = "C"), "#0D088700") expect_equal(viridis(1, begin = 1, end = 0, option = "C"), "#F0F921FF") expect_equal(viridis(1, alpha = 0, begin = 1, end = 0, option = "C"), "#F0F92100") expect_equal(viridis(2, alpha = 0, begin = 1, end = 0, direction = -1, option = "C"), c("#0D088700", "#F0F92100")) # options work as expected expect_equal(viridis(1, option = "B"), "#000004FF") expect_equal(viridis(1, alpha = 0, option = "B"), "#00000400") expect_equal(viridis(1, begin = 1, end = 0, option = "B"), "#FCFFA4FF") expect_equal(viridis(1, alpha = 0, begin = 1, end = 0, option = "B"), "#FCFFA400") expect_equal(viridis(2, alpha = 0, begin = 1, end = 0, direction = -1, option = "B"), c("#00000400", "#FCFFA400")) # options work as expected expect_equal(viridis(1, option = "A"), "#000004FF") expect_equal(viridis(1, alpha = 0, option = "A"), "#00000400") expect_equal(viridis(1, begin = 1, end = 0, option = "A"), "#FCFDBFFF") expect_equal(viridis(1, alpha = 0, begin = 1, end = 0, option = "A"), "#FCFDBF00") expect_equal(viridis(2, alpha = 0, begin = 1, end = 0, direction = -1, option = "A"), c("#00000400", "#FCFDBF00")) # bad inputs expect_warning(viridis(1, option = "E")) expect_error(viridis(1, direction=100)) expect_error(viridis(1, begin = -1)) expect_error(viridis(1, begin = 100)) expect_error(viridis(1, end = -1)) expect_error(viridis(1, end = 100)) # we've already proven these work with ^^ but we'll add a few more values to # generate and get better code coverage this way. expect_equal(magma(3), c("#000004FF", "#B63679FF", "#FCFDBFFF")) expect_equal(inferno(3), c("#000004FF", "#BB3754FF", "#FCFFA4FF")) expect_equal(plasma(3), c("#0D0887FF", "#CC4678FF", "#F0F921FF")) }) viridisLite/NAMESPACE0000644000177500001440000000015312621244504014277 0ustar deepayanusers# Generated by roxygen2: do not edit by hand export(inferno) export(magma) export(plasma) export(viridis) viridisLite/data/0000755000177500001440000000000012724421105013770 5ustar deepayanusersviridisLite/data/viridis.map.rda0000644000177500001440000005660612603537542016733 0ustar deepayanusersBZh91AY&SYyϥ#==m\_^-޼P{U*ۻκ{Pw]z{޽ٻɖ{yݹw][;gvۻ׮{y۽׽nۖݽn퍹y{n޳zޯ}ۓ{_tZA@:w7:&d jx0 2MaLd FhA@M=AU?ɣA4&# jzLI#Ԟ b4x4i

vJ+\E-F =/p Iq3|4@&>[&OOc>?N{e4;zENI{j~PwYyg#O`SҔS`B9~%H]r1X FX3R Wnk??'LnO͢X40T<l W_vowi/R`/rq;+FV0ЃZ>Āye ;͐ҍjyJiy_vIK}kqHvlR%fǶJj4yŮ|d"hᖈN0bxL~Ȟ&G |w1o[7Cm@i9L^W,Ư@t澊4gn4Z{ڔE>I; ^ݽ;!^Yjg`>ERp 퍼u[f:T;%+!Ab[%Gx8[|PPzXv.:K$4&z7~^d r=zʃm&b6s,i,ӽ e1 ;3 oиH94y{j:f/-֓6sfbVx `^g鰴ִN,qQÈ|dqO6%MVJ-MDaM[a7؋\O{(XH9pO`K3q I##Xvnw7_P-L{(7Y' UJXT6C7ݸ,+E%Or853OB_n*M&d#UN뢵b#7j>wݫGO;D\ at6OA!Ub칞b"k6lXϚ]lJ2 .ה_f{xf`=E7Ƅ9ՁwR1|̊.rѴʋՆR$}[7MeD׫RUIq1=e>Sr37RInjsrJY t14m?AO0^ULaitOLfp^@R&wh\Ypw\t1Q@ n/+SGt%̳O9ᛁqú1mN1s˹kq":J{XqeT}أNodw"tr]5rLm`fl4[RT>ȋu%"$5^3 8`0HgY:kQT\PL]IkLQ8B4{1|Hh$ܿA{)}Iܡ{I;P iq48e6HJFd̙wHg<ζs aC^`ePEcR2[5Ͷ;Ԭ"i(YMPL"+ ǶV)C!w;wD}ڃ['3 agog{:#W ]wXF^̌E,/-ҳ7iKV 7Ϲ#O^u&xKNq}3BPڄ3ǡ;~-]#ՇɘTS)`dIR2f0wX:}1~(85o#cvF^./41Ju0uk]-55'sIoUlTWodJ]c՚atz=Gh[f$L\V/&}\i-@ aĤBӥWeSHwΙ Ʃe>K2ċ+ޱ;fy)BY2H+47Qin 툴`{KalBkqPWǃLHi_V|{77~k'LT=X |zS4g\BԻ ^YOQBD"E~нiOg;5\TuzK? gɏ<ݴ(`O^;jemYKt KZوh\@8B}p׿MBN_O#*sFaZۙh(E-4z0e;՜_l%gDY&{n%ٮ=("zеe1Mb K+mD˅8`3R3e~q/tΟ o,gӃAFnǢa˻_.0MV^e ˼ptFn}wlm-wI z*osrEih,]O# U(h;-竈{|=E.iq;  [ ]ҮL\YI7t* `A~b|#cf]r=@JC)*EʚK6fܳxrP5MzY%ߙc0򛜧/(rg<Ox"mZ\3zrEc>/!UӑnZkLW >œ31 /(,~MoET=9j |lVte8(:7ӺǑ&!!*c͉gR+ Y|Ӡ~pzsyCv; oPe"@pEBM saEgw>$ K,iN,=[e"m:N`I *WXeEK)R㒋AG ̩O&ӑ6\1yAe ڍxreUBZb"?w3Mhb"E@lk#cRؖU|[|+\n]q>mq:2,`|P)&7޷:qe}W,,!*HuGet_pZrw1gKB;`kR ~Z"1%0;9 KHS2?ս2~8NnF2w.!ej6Z7 5)?7{_q٥a䍶|x&莆UObR[HQ,SMdcWOtkWf#ﭳ.s s?AN R3z}|2_\uPTL3':Y]FFhZ3 Wx/7qEvYh4% ;bQE08D.#RNƣX}>ieT,wU!⃗rғ9\ |˕+y i*p( ⸝ KYYC>/Q.n,/!yR*mbEw-0k`̳bY_Æ=VdWMc=T7g'+".lwH&Bm.̅ZO褨R"`4b\<› yOus Bz Ӡ%/YuumTdn}&%0wcN:hF 9^(wQr3 5X{IAzԳ8;hSrt8eln-Y'.ލSc]= K;a-u}Do*ٔ~c±zL wO;2ލ\1`Ġ~;<$[\ x8C Y*>VR0Љi}[g+6e6Ljmo7|륍/N.!fY,똩Y%u zDPA67\G4q k⽺5h*OY 0v)TjU}߸iL z r㿡^Mmg2O9ɴ>W8g&TCH}>'42\ܡl=:K:] hsW{ضyO?Ga#ⅿe&Xtma|fN\Uu;M{Oë<$ SK cY|FFCƵ&}``gkA<pkIv>']W,7Φ.YJɍ++cP,roץzz0nmX~180U~Osc&˰@'&j^H;[vP]-,[m ,䔿Xg9K%߹ iv32uzLAjbO՝޾ iϊ>Lm Bbjj n$5_Lu)v0{SWvuVond^`6'9pY ]Зa-sga⢳ʰ}58W2=)p@;lAL-b쳳 2ioH$~fQ Qq!o&ہ@-IE ٔ='}+Lk#=ޱհ>sk\wAcV!_ٽ$wB~Ѿ_یwAH_4h iNM]MxP$ύ>U쩾b7aF_,*hj[)\!5d@0r-ݼxL6_fZުpKkҔVª4f;~,o64Z+ۍ]ڸSG:kWJ"YI.}祭G EdR66˦<(T<.yg8LӅbyv41VzFܗ AN%#πX/V瀎ܐAFhEK-"Zmunkz:u;-"Ї˥PL`@w|ZoH@[FЙdp3>4?>w+>C8-Kvw =1/U}N1겍)Iol7Ƹ$.NX<~q^W8^L!+ pʸB4DIr:eUgW {He v[dSYq 5kM/|׬k&PRO/5G%Uh< %v VsC!S)xSYL}~A=i^c*y W؎>&win-hQJ}Hצ=Hy51:fS!k63m~Eڣ*x _KuCO$z VVҶ'>6U-n뵜&użO lS+!$V""FgzJI띥1r]R#x]&+t7d%]z?8 6MoOR0RV `ll!7ΡJʏ#d2buE:^mYa>YFװu0ڵE)lhE4m~832uПX``|7YŻߣ~ȣK`j,am6 tu0d1W's+ٺ8m $IP$a8wAa[JclQI{)Vo!j&TW!s^e'ޯ ejsMoͥ¿T`sVH9 ]|^O@Jnʽ˵3>nlZ3`*=H<@ ~D$hk6Q? *1Խ0",?:CsV!Xuu ꔱȆ://:}F?+Rµ!*#z){m^@h(Čg|@r og\A 0KFi$\6fqU˔i{t Ej5+ 2(L.{/ϺsY ӞDV{wA5K=UfP!qÚo<.E3`kiyyMϘa?FlWLޕG5sW8f)K4k  x ~Eg#]lډX5o\*{ :\M61d=4ĺس1 ⏌U/~4p6Ɨ3|pt={!Bu[@EWD}_t5 躮,õȔqi q9e/*~6Ԟ8VcGě@OѾ#+.XKV\(k3ގ. n.A k Xܠ x2]}̍[`'@c~!2qn{sq"XhA. ɒ r.Pa^*n9?urrXӄщ\l9mmXK`$?ФR3t=?]'m&<:gfhBKH$!FbҠZ{VʊTBP$zGhvs855F@B$ ҏFdb@;y/f:˔>J lJ$#7W(`82 RQ|0룳΢U 484pAJbmr&NZQ\Ft_*uضK9yD{my'ÜN>ȩ{^ig/E荿]%ejF>U|Z%%p==炓W|.]eH|fW(65t h4,3(!dFhE7He| 6G/]=/z1ho?-]@v٦OJ1dVոmb,1 ƏYu#I2x-A{A@˝qpٳjWsL~:\ɝ F)w}RH|`[/SᗶM!zi?L߆᳖; l!U4DC=r+Ba۰zYz#8+clL\KY:{>x0ISC]G:PwY>$nҥؠƛ1qhas\Bggib2P~!hXdReK+KzqTR J OD&Iӕ4xr({W0gZÇ;*jtk%)?ג\#W)a99 I@HNno6EvvS?zE5k*kOzY9}"e:~@kgSWঐep+I(]"juPk{Hp4|0}} O Xj|4O3É2Tl;^/k|C$!Fޛ TF8)NLV3%L\>_׌@LBotiǗזy@2Y'VWZu+EZ}X4hzScφxY2%)2 "L&dd~aS"%)ex?Bx)`.c6 OLv%3PTZקŌp8! (]燃-ўYqM^Py'D;m Wdōt|eFr}!qڲJs !CF^_aeޞQ j/Тik zϻ[̇y3c+E @Z/lh!څ ӠG- ,Wl WWmWE&" Rpl'DiJ֥_JFմM+H}5p M3i*oLf-'1gבּ>Ҙ-* {Ms> Pkk1.ݝFwFG5emLIr`Ѿk6F?yb׮kO^7tV|jH1# $|UZVv揲GmE6~H{R>Ci-VX؂pfYb?U:2?!/0ձZVӇK]8|WF0^#woR~_զfkSibمr03=!Zzsm]#wIWJbn4pͦX|.6 pgvәA9zmUK(y R |.^֫I()_L奷uEgB6C0-YMV Ǡ$fJ>ɭٽzzgWX nj4${mNMϊ^y/ Y4"Gah}ćcɏN+t&pm62ʎ,Ԙ͙ s+xߴJΰ^nPwse&?&xv X|ֳLd\3"P`r`@N/ މ[}8]#ulL.77 늿Z8&o!u:+_bZ1&tȁH"mã/'..O%shXCo) 6(٨5GYfKQfÜ]rWŸ_=`g^)F KyOu(Κ~Xb3 gCv+9FQm,[{5 Ea*t)+;N0нO؈T$'Rv'fF 2=ys4㏊ /ο#ޞFö >$':f,(AIO2pSD ;A'yme;~i \ƈ7$t`[J̔ă}±!=4$H8Ƀf`qWnH=s^(~j$ý~|\D3I_0hU Sﻛ5'Lh7Q;WS7kс3GKc{Ҳ\Wn(=NMV0mT_`XiawC:p09WՇep.ZU "*"1>25塤VNjWeu҄3hMzb W22˾yXiM;! I n5,W w;V)ҏЂL?ߢLYvswtۊ eAR֤%@$j7`K1f/j1kt1KEd)yȿ'#O4fa*R(-_;\>x!fz ]mTŊŤ,y AEX l> ?LJc|(TQl)r.ist.A?@ R j}MJC9FV4݊<}w,wHA/s|| PO܎djCGTH_Wg72C>ݹ|SaA;1ޗ4¸4Q |߿L)I/([eC+܂tc2N{9/e5Xd5MZwfhQ^5Uv7<]wKٜ?ɂ麣SaD( h$= \&ʼnh[ΒwI/8\{"lW= v ݰ0d9?>6YHpV=iLʔVį^ !%[mSgNz6Weư7fU: Z_|9n]~_)6]=K?)/v IU.ãQ5$xf<~7ǜɒYmf= ~ñ=޳FdeVÍ ½Dh<ŀh_E'EvV.5~M>ũ֤k Z HXrdiN%%ru8;TaTho Ҿ;6lު% ³)/"a*Nb >qd`͠"!a!cwhn"mU>gC(X+B PN3f޸μcDl&dmj0^8Ȍ*<~|S!f1k!EIF>ee&]yT1Sp_ RDáazXQ4wvuR"rO*}IVѺ ؈.e}6}a'N$dsmHyS _@S&6Rɩg:厱K[НnsuΑ ]#F8pB#$u^- 8#m-Mެ.zǚX=]cA~=f'z{)C/PP܊ll Dh/b3sҾZ뱏9p^a%Cb:+{!cwv”\I6XH/&Ź%"8ܷ $8Tcu:;P<-.c1X:i'Bw!ZEW.ήN@>f%D\Ѭ:sk!;Eg"b+8qFT Q M3?߭3 в>yRҵ=tզm\t,_8>z5: XG`&/L,oa٥UOå$dsi+L"~:ɠ >Tlޕ _&uЏ6Ywy ,.c% cJs<}e:Lk >KG*^U:HzTԤqzGaǔILؔ}̧hiZ0V/$seYv'P zBfW^7*X1hWFԭ E0^ :xXK=YžһOj)aڿr?f&a=IsR1N 0uE$mТڜi;8d%DomFY o!B&0hhN+iU#4&Yi~22ﱼFNh_z*>yX _(Dym!nh… ?iӓ۶Df@Y\x< L!l=s ߃c ~^zƋ*&.rkcũ/M5C96NwU9Qc5M^C)BY5u]F~5榩kDk9 蠻Ay&+޾5-d)|_&%e./kX.2}%?_[0q8Y uJD$k4!$}] (!g1*N J3J'U0KqITǬo6-LqxG%szǃ{'T`O?\h->P`ϥo@fPAbLR^G*%P@!W>Tlj6@q`{/42<]X}q<U}"ueyi B\ybh8yeD adyE x앮o@9&9g)ڟ[L螅SϋcQ p7=2܈P:+@LvMHn:}=Aup@G꫟lt(X}94p[MF}~~g߽2M;跨*fq~퍱ɡEn&&0sHQTݔK'ElN}Σ\eB\j4ZwȒƿ8嚌fG}6EZ9A-Õ ۺlD#mT:3;Dz `9x 9Q4wlEi.!d |\5)xo9 Q lHFXtdIT }_e3tIJ:DY&vf_XA,,΁A鯂|Gཹ۾5cûC"n:~;шgn_ĀZ۷Xf_Zu.^h@߹6rQ[( WvmĤ:[ vr* 8n oݟG'Sqe5vMI^Z҇7bB}N|[fJ7C 4rVer,}\`̉ Բ79f=WeI2nHw4`5cHLH_Τ}G%<-ʪKj=fD _ĊǴaiz:5k]uss.f+lȰ6/zneRZoo;j[m]47MH!}_)קhuH=K퉅F;fC?MdbWɄ_w;fYVz@XuUMbYh- }A|9OO&5Mo9@i;ξ?? ڪc8`&ҁ^qv X/ !D}Xj ~/5Ap >cFIQv[Pni(%?w4s;h3(S/sd(! h)tی\nUEۅ=G*޵\|[nChCڻnp? ݤƗתWvCO8I8ew? 4,&ME6κ`951N>,o]XWMRQ@@qƉa47sSs e,`%B NeW/S^O67T 3 qYМlPLQlv7R<<ԖN: QrxrD zzlϫ.Q`訳gf%;GLې-4䷹p@}"8u`cP*>de7Eaq;M9??(zxTw\Oۨ`vDUdj IAEC}-Y:&K8|5c2(tD={qA(zyنVKqs+Ѧǂ.$#wB97:d#ʤȻTZ#'Y>vߙ u{C9<FH-rm^~kq:2?AZ8XKMnA]hm,pb!r*'+T{ Gr0s[ cj8HX@%dͺ { '8w}ˍ1u1i|eN/ϝK2?l Kut-%@ `^/V#E QKǬh!T6~ ;g΄Vl[1X0H+FihWSHE}p1jJzuƟVߌJlZe+S/ϕ HCF70>n Ju.}.BO΄qg7QFBrv^¤k/~^?yEB`@k sО& A)(4ڋuL# V*yfb׃38xYJ" v ~ؤt^~QſI=Ѝnb5@L&QiNrmjYR'7ߛW-vbgxR|RqIi`Aʠkgd&Lganywf.֨kP `@y#\ym:a~-;a/9'$fth[哳=y֭t7Z  GU]q2=֓0B(ǒʬV|g9Gn;sR4nL gKQ0H\?Wրв,E4Xcj8T)OsmW"yM|vKPhB=V=pV0n7Ií( FZ`ۦG1~b1΃HکEX* 7^e)ըRNp'uٳQk+ytєp aTea TvjIs]grnP-㯷d /v=xO< V[œB\ I7Ӷkߋ]q(v(s)~\Qުν?ϖYgn=i|͔ꝁDY4ކQ[LI us7'x6~YT)Mpcl qe#0Gg10FдJ/;?2 U╓3Hg|g+ySIF@ؙyi&LhorWa5IhQ9вqQ[gM=.4y~/a3K4piWR|99\dp3(a n:C}t.w:¨lV pz,{y6&R 'c2\^vbzcCSط2 #j K1 ) jE/Zz iAf  a{ 65f'C_?Jn {+KD  _}ñhb_2g{^MdRjJ 6rO4bp5AZЉ:gE mOf[Мxt CbYP_bG+I'gja=иy;qg{ȴ4VQӰ x]v.a 5p{F{DBc8LJM>́e EυqdwMڞC̑5N".b 2:n_#}UX6G3%n7A#[W|j]zv6YaMJͨ]O\1>mowj ֛?T#>RDi"1C_sY"|A#ǭ[#Z;'אnmr/*-cxJ*ǣP+&3;j8m8ٿvx0yU['>C:ĭw4۶1=Nq)+WLX)ԅl^m<Z#^lXAlE+u?J(<Ce]mӥ[-rzke^~U"W}իj[Qi,*I#+G&S[}SN[ו$5TO+ЉEةR>}c[#,<) <>=bod#\YCK!Igi|NʼnҦۄg3^d^֔}cK:5RC-h&Կ|23:,{NS_ޱgE!L܎O(Z#׹^+䏣*~ӌ:[w&'F214 [f~=F778n*4< TlhgtZXoMhk%+gގ\l!kf S\W!FIvV HW\'v]-7aAEaj+h ,BxQe/;K2 qß)z#yӪC5h4lwx[i1;Nꮆ89PNq\JRwRa񨒴p9x Ûw/r@]dqՙs27>b=}P1XN^k9{V4lyP5E쎾*`1>x(RiՎ,齔CܣFhA"Q9>>@W>?Fo vKt(fc$@#OAS(bcXq+3Y[yD#pv{JuN`Tf` (5\:O٨Z$K`mMǑWiPO\T)4Q<"݈TQ(i 3B]]b!H69fPA\53dn )(:d+.'ߤyNу#Oԝd^B7e̓@W%EQ 19>Jȵ FZ A?z)wb|O٨f23C #x9QW";Хt-Aq')Q#tw|љ8Eso#2@۟RP2~Fڛ?b v?nDYeXi Sz8/{SƼ@^bY9ӳw{m骰uU3ui?a:vv)(_",5WɆNp/1ykhi`x-}&q!2X~sژشmXH%of]IUw"o;<*s \m0~ud,N2j;pȉ=U[ a.p+ g"w;29_8iQBچdic,=,Ɲ\~q;òGxn[?tAus6k+]uYr?' G Ns͠g*6 ig;Lg lIem|:&ee/ѤI^nk"ĵDΩd]_6vWT*7@/Dpe,>Q"z¶?P9VVQjk FT{d04>&g6$k@4:-]ߓJ[ZB.~Ryokg;t "$Q/Dx 9v>3d֩kx=].^g-Y~hΓv5ϟ#xg乔E> rVH0pH>RX 6*{z6eʔ0y;uc?Owboj&'>˶A+/+ͳ~P&l=sܐ?_$UL ~ƄivPU[fu{))w#B@"h.`c P{FoDJ+8Y]Y6$nTqe! }}_ȏ2'BJg0L@XҶ?Yi/5n(1DfM5 p~"&R unRX@+F #QhPAq$ǒķ|BSJg>nX;E:'K\*[-B2 bF/"$bpnǧUH`[Z]HB*lߨrY?UoATIW/GST*#$+qIHo&W!Xg[=/υ#KĬjsi?GE*o@ N_5q,䪂S92ЯH&*N#^<ˬ-tuBҘHkP|N)ĶRU"GmC *SN}$T@]SkaĨ=fjߌޔ3dHr0p"wE)"P(#Jhκp[EZ <Ð/O(T0hTn')%%]NjnŻXN^ȧ]1D g?%`V*S>R({-gMƍD@jn\j,1wsk>Ui-νG͟[dm/Ͳ +w׵k* ŋfGhBiwPҝdf=b `DnՆb+٫uXϞQ/>s[1>bp}0m -Pej Tc5jdZ_$  '{L~ LĶB|uIWktv edunSvW\^G+9^5qx"YlSpb͝xRn⹩&F;UE^N2I1Qnke 4b'ntC[vB|qGqXSwdASX";)-ܼ<ۯ;RHGvUC5#cD*[;X9&׬t܉A1ZœfyHRDZ%H 6m#3핐;Y_y1>OqXM2}; x7_ oόhTwam2ù̚7 + ]SԪB^d1~;u%FSµIt۞^mĕRC̏ttۆ []L)$BI.Hqp']BA>lviridisLite/R/0000755000177500001440000000000013065002375013263 5ustar deepayanusersviridisLite/R/viridis.R0000644000177500001440000001373713065002375015072 0ustar deepayanusers#' Original 'viridis' color map #' #' A dataset containing the original RGB values of the default Matplotlib color #' map ('viridis'). Source: \url{https://github.com/BIDS/colormap/blob/master/option_d.py}. #' #' @format A data frame with 1024 rows and 4 variables: #' \itemize{ #' \item R: Red value #' \item G: Green value #' \item B: Blue value #' \item opt: The colormap "option" (A: magma; B: inferno; C: plasma; D: viridis) #' } "viridis.map" #' Matplotlib 'viridis' color map #' #' This function creates a vector of \code{n} equally spaced colors along the #' Matplolib 'viridis' color map created by \href{https://github.com/stefanv}{Stéfan van der Walt} #' and \href{https://github.com/njsmith}{Nathaniel Smith}. This color map is #' designed in such a way that it will analytically be perfectly perceptually-uniform, #' both in regular form and also when converted to black-and-white. It is also #' designed to be perceived by readers with the most common form of color blindness. #' #' @param n The number of colors (\eqn{\ge 1}) to be in the palette. #' #' @param alpha The alpha transparency, a number in [0,1], see argument alpha in #' \code{\link[grDevices]{hsv}}. #' #' @param begin The (corrected) hue in [0,1] at which the viridis colormap begins. #' #' @param end The (corrected) hue in [0,1] at which the viridis colormap ends. #' #' @param direction Sets the order of colors in the scale. If 1, the default, colors #' are ordered from darkest to lightest. If -1, the order of colors is reversed. #' #' @param option A character string indicating the colormap option to use. Four #' options are available: "magma" (or "A"), "inferno" (or "B"), "plasma" (or "C"), #' and "viridis" (or "D", the default option). #' #' @return \code{viridis} returns a character vector, \code{cv}, of color hex #' codes. This can be used either to create a user-defined color palette for #' subsequent graphics by \code{palette(cv)}, a \code{col =} specification in #' graphics functions or in \code{par}. #' #' @author Simon Garnier: \email{garnier@@njit.edu}, \href{https://twitter.com/sjmgarnier}{@@sjmgarnier} #' #' @details #' #' \if{html}{Here are the color scales: #' #' \out{
}\figure{viridis-scales.png}{options: style="width:750px;max-width:90\%;"}\out{
} #' #' } #' \if{latex}{Here are the color scales: #' #' \out{\begin{center}}\figure{viridis-scales.png}\out{\end{center}} #' } #' #' \code{magma()}, \code{plasma()}, and \code{inferno()} are convenience #' functions for the other colormap options, which are useful the scale must #' be passed as a function name. #' #' Semi-transparent colors (\eqn{0 < alpha < 1}) are supported only on some #' devices: see \code{\link[grDevices]{rgb}}. #' #' @examples #' library(ggplot2) #' library(hexbin) #' #' dat <- data.frame(x = rnorm(10000), y = rnorm(10000)) #' #' ggplot(dat, aes(x = x, y = y)) + #' geom_hex() + coord_fixed() + #' scale_fill_gradientn(colours = viridis(256, option = "D")) #' #' # using code from RColorBrewer to demo the palette #' n = 200 #' image( #' 1:n, 1, as.matrix(1:n), #' col = viridis(n, option = "D"), #' xlab = "viridis n", ylab = "", xaxt = "n", yaxt = "n", bty = "n" #' ) #' @export #' viridis <- function(n, alpha = 1, begin = 0, end = 1, direction = 1, option = "D") { if (begin < 0 | begin > 1 | end < 0 | end > 1) { stop("begin and end must be in [0,1]") } if (abs(direction) != 1) { stop("direction must be 1 or -1") } if (direction == -1) { tmp <- begin begin <- end end <- tmp } option <- switch(option, A = "A", magma = "A", B = "B", inferno = "B", C = "C", plasma = "C", D = "D", viridis = "D", {warning(paste0("Option '", option, "' does not exist. Defaulting to 'viridis'.")); "D"}) map <- viridisLite::viridis.map[viridisLite::viridis.map$opt == option, ] map_cols <- grDevices::rgb(map$R, map$G, map$B) fn_cols <- grDevices::colorRamp(map_cols, space = "Lab", interpolate = "spline") cols <- fn_cols(seq(begin, end, length.out = n)) / 255 grDevices::rgb(cols[, 1], cols[, 2], cols[, 3], alpha = alpha) } #' @rdname viridis #' #' @return \code{viridisMap} returns a \code{n} lines data frame containing the #' red (\code{R}), green (\code{G}), blue (\code{B}) and alpha (\code{alpha}) #' channels of \code{n} equally spaced colors along the 'viridis' color map. #' \code{n = 256} by default, which corresponds to the data from the original #' 'viridis' color map in Matplotlib. #' viridisMap <- function(n = 256, alpha = 1, begin = 0, end = 1, direction = 1, option = "D") { # nocov start if (begin < 0 | begin > 1 | end < 0 | end > 1) { stop("begin and end must be in [0,1]") } if (abs(direction) != 1) { stop("direction must be 1 or -1") } if (direction == -1) { tmp <- begin begin <- end end <- tmp } option <- switch(option, A = "A", magma = "A", B = "B", inferno = "B", C = "C", plasma = "C", D = "D", viridis = "D", {warning(paste0("Option '", option, "' does not exist. Defaulting to 'viridis'.")); "D"}) map <- viridisLite::viridis.map[viridisLite::viridis.map$opt == option, ] map_cols <- grDevices::rgb(map$R, map$G, map$B) fn_cols <- grDevices::colorRamp(map_cols, space = "Lab", interpolate = "spline") cols <- fn_cols(seq(begin, end, length.out = n)) / 255 data.frame(R = cols[, 1], G = cols[, 2], B = cols[, 3], alpha = alpha) } # nocov end #' @rdname viridis #' @export magma <- function(n, alpha = 1, begin = 0, end = 1, direction = 1) { viridis(n, alpha, begin, end, direction, option = "magma") } #' @rdname viridis #' @export inferno <- function(n, alpha = 1, begin = 0, end = 1, direction = 1) { viridis(n, alpha, begin, end, direction, option = "inferno") } #' @rdname viridis #' @export plasma <- function(n, alpha = 1, begin = 0, end = 1, direction = 1) { viridis(n, alpha, begin, end, direction, option = "plasma") } viridisLite/README.md0000644000177500001440000000617013065037503014346 0ustar deepayanusers# viridisLite [![cran version](http://www.r-pkg.org/badges/version/viridisLite)](https://cran.r-project.org/package=viridisLite) [![rstudio mirror per-month downloads](http://cranlogs.r-pkg.org/badges/viridisLite)](https://github.com/metacran/cranlogs.app) [![rstudio mirror total downloads](http://cranlogs.r-pkg.org/badges/grand-total/viridisLite?color=yellowgreen)](https://github.com/metacran/cranlogs.app) [![Travis-CI Build Status](https://travis-ci.org/hrbrmstr/viridisLite.svg?branch=master)](https://travis-ci.org/hrbrmstr/viridisLite) [![Coverage Status](https://img.shields.io/codecov/c/github/hrbrmstr/viridisLite/master.svg)](https://codecov.io/github/hrbrmstr/viridisLite?branch=master) [Matplotlib](http://matplotlib.org/) recently [introduced new color maps] (http://matplotlib.org/style_changes.html) for their graphs. They are called `viridis`, `magma`, `inferno`, and `plasma`. `viridis` was made the new default color map of Matplotlib. These four color maps are designed in such a way that they will analytically be perfectly perceptually-uniform, both in regular form and also when converted to black-and-white. They are also designed to be perceived by readers with the most common form of color blindness. AND... they are pretty! AND... they are now available for R! > **NOTE**: `viridisLite` is the 'lite' version of the more complete > [`viridis` package](https://github.com/sjmgarnier/viridis). `viridisLite` contains > only the core functions of `viridis` that generate the color vectors for each > of the aforementioned color maps. It does not have any of the other features of > the full `viridis` package (e.g. scale functions for `ggplot2`). This was > requested by users of `viridis` who did not want to have to import the dependencies > of `viridis` but still wanted to be able to use the color maps it provides. --- #### Look how pretty they are! ![Sample image](https://raw.githubusercontent.com/sjmgarnier/viridis/master/img/sample2.png) --- #### Installation `viridisLite 0.1.3` is now [available on CRAN](https://cran.r-project.org/package=viridisLite). You can install it using RStudio package manager or by typing the following line in your R terminal: ```{r} install.packages("viridisLite") library(viridisLite) ``` If you prefer to install the development version from this GitHub repository, simply copy the following lines of code in your R terminal and it should install everything you need to use `viridisLite` on your computer: ```{r} if (!require("devtools")) install.packages("devtools") devtools::install_github("sjmgarnier/viridisLite") library(viridisLite) ``` --- #### Maintainer(s) Simon Garnier - [@sjmgarnier](https://twitter.com/sjmgarnier) - --- #### References The color maps in the `viridis` package were created by Stéfan van der Walt ([@stefanv](https://github.com/stefanv)) and Nathaniel Smith ([@njsmith](https://github.com/njsmith)). If you want to know more about the science behind the creation of these color maps, you can watch this [presentation of `viridis`](https://youtu.be/xAoljeRJ3lU) by their authors at [SciPy 2015](http://scipy2015.scipy.org/). viridisLite/MD50000644000177500001440000000106013065130212013357 0ustar deepayanusersed736744445d8de0d99ff8924bd906ae *DESCRIPTION 78175506ab79be2bbf5136a8ea9e9485 *LICENSE cc75ae67fc566f41129fd7c01441550a *NAMESPACE e750b63ca1dc8e1a3d7fe16971b3a89a *R/viridis.R 74a0bdfb9d08c8d535825a1b30ed6245 *README.md 903da03b8b1acb114f248e479f8637df *data/viridis.map.rda 3573b8b3513698bf5e6a6182ee93b126 *man/figures/viridis-scales.png f8f1d2afd1dd28200f8d78d62e2dde31 *man/viridis.Rd 2df4d52a12fb25a4f8d82c6b7cce5e57 *man/viridis.map.Rd b23de8dc9cf66191a261629ae68d22bb *tests/testthat.R 07b6f51128a4bbc223aa4830a7b7b419 *tests/testthat/test-palettes.R viridisLite/DESCRIPTION0000644000177500001440000000276613065130212014573 0ustar deepayanusersPackage: viridisLite Type: Package Title: Default Color Maps from 'matplotlib' (Lite Version) Version: 0.2.0 Authors@R: c( person("Simon", "Garnier", email = "garnier@njit.edu", role = c("aut", "cre")), person("Noam", "Ross", email = "noam.ross@gmail.com", role = c("ctb", "cph")), person("Bob", "Rudis", email = "bob@rud.is", role = c("ctb", "cph")) ) Maintainer: Simon Garnier Description: Port of the new 'matplotlib' color maps ('viridis' - the default -, 'magma', 'plasma' and 'inferno') to 'R'. 'matplotlib' is a popular plotting library for 'python'. These color maps are designed in such a way that they will analytically be perfectly perceptually-uniform, both in regular form and also when converted to black-and-white. They are also designed to be perceived by readers with the most common form of color blindness. This is the 'lite' version of the more complete 'viridis' package that can be found at . License: MIT + file LICENSE LazyData: TRUE Encoding: UTF-8 Depends: R (>= 2.10) Suggests: hexbin (>= 1.27.0), ggplot2 (>= 1.0.1), testthat, covr URL: https://github.com/sjmgarnier/viridisLite BugReports: https://github.com/sjmgarnier/viridisLite/issues RoxygenNote: 6.0.1 NeedsCompilation: no Packaged: 2017-03-23 21:36:52 UTC; simon Author: Simon Garnier [aut, cre], Noam Ross [ctb, cph], Bob Rudis [ctb, cph] Repository: CRAN Date/Publication: 2017-03-24 05:37:14 UTC viridisLite/man/0000755000177500001440000000000012724421110013626 5ustar deepayanusersviridisLite/man/figures/0000755000177500001440000000000012724423021015275 5ustar deepayanusersviridisLite/man/figures/viridis-scales.png0000644000177500001440000006622712653212061020742 0ustar deepayanusersPNG  IHDR@%R\ iCCPICC Profile8U]hU>sg#$Sl4t? % V46nI6"dΘ83OEP|1Ŀ (>/ % (>P苦;3ie|{g蹪X-2s=+WQ+]L6O w[C{_F qb Uvz?Zb1@/zcs>~if,ӈUSjF 1_Mjbuݠpamhmçϙ>a\+5%QKFkm}ۖ?ޚD\!~6,-7SثŜvķ5Z;[rmS5{yDyH}r9|-ăFAJjI.[/]mK 7KRDrYQO-Q||6 (0 MXd(@h2_f<:”_δ*d>e\c?~,7?& ك^2Iq2"y@g|UP`o@IDATx $U([@wCʾЀ : " nSOqE! *8((#n0 ,(, 86;MUf:ݙU}MFDOoMz.o/W[n%bj~lvmÔ @LY);F<rp뭷Nf8G>%X>~\H`|=-]ve>M^{m}'K.$yˍ}Y?ڟ+|p:Aqۻ?tAm骫j+WV_}tGO|ř~ @SS=@ @ m)*3hC}8z駗/~qZkۑ\,~~4hԧ;/ciB?s|VI':ꨥ}> @)&:&p @}kۛv[O+]tQZ`A{1^Kۦ-"=OLx3&?lӲ{>s1m"9EO X;ͅ|ɾ @`j ~jϯ @q<84?ri\\,}kjQk+'},>ye0g>~{=Hӧ=д{K/&YiM6l.|yvmW\B?o޼hX @&3@'I Ww_y{e̟|;ޑW%?hho?D)}[.~Ki|,Hg~HI'xba뮻YfM @LQ):E(3+Ss4/7?\秼U*W?[neQ]tMco6cFg!s75yMqg$?K_R:믟Y_bh+ @Pskd @B`7. Tr=K&+P8?sg_YgBۇrHWW>EEҝw޹8 6T# @I+:iN @@Ð򃐮ꪢXF]٣+qv.sOfl[n%}[J `W_m @` (N 5 @o'5\& j!@ S{~ P䧠w>.kto\+ mQ#aE vʕW^Y<~ܹ% aKrYkU @ST`a @8ꨣ422~gUVIGqD{_+~|=ДOl_Kwqǔ٭ԧҽޛO?ϊ?8r+ @PkX @lAz ^~ |~??0huߴ/Gyd:â/|W/. g}]wݕ'_r7w&@b.bj8 @ t> )G'^,~ ΧřvZ9sf$Ԙ6nmK_4gΜ1\͗W%A Pk˃iJ @`* 3]{~ŲhѢt5kV]{9A Ph @ @ 0@_ @ @T+З 5 G2)ؕ+xFw KíX)n$/ˣX=}$2<|:܌7qǛi<sՌDkF0<'^4^38w1ǎfpNQFl݊ kE s׊ FlĎh89iNDNṋ9$/&8W1m&>V+d,`~EhQ``q7&?wc!K]x=>c7:Kc 1~\:Zۅd;:w(.v؄`8z%w]+x88qdpѾ?[h((L],^+hֻ.?27K4ܔflŰsF|$x`(/ʣGG'>f hrQ@5=w(6px(X{4X8 7[Ge}9@Gs7Z(is.6Tx`.:F-G ~u3X 9V"㍎#Z،:9ip48X kkMpJ,h+Qp!2(:|K4^tx)F cŜ 5?z=MC=jKk$pp_X~`J'/nZc}U @ @B@ U1  @ @h-A @ @T!Z @ @B@  @ @PBUL @ @j!Zi @ @U(V*& @ @P4H @ @*@P @ @Z(b$A @ @@ UI @ @@-@k1 @ @ @ *T$@ @ @ I @ @ Phb @ @ P ZL$ @ @B@ U1  @ @h-A @ @T!Z @ @B@  @ @PBUL @ @j!Zi @ @U(V*& @ @P4H @ @*@P @ @Z(b$A @ @@ UI @ @@-@k1 @ @ @ *T$@ @ @ I @ @ Phb @ @ P ZL$ @ @B@ U1  @ @h-A @ @T!Z @ @B@  @ @PBUL @ @j!Zi @ @U(V*& @ @P4H @ @*@P @ @Z(b$A @ @@ UI @ @@-@k1 @ @ @ *T$@ @ @ I @ @ Phb @ @ P ZL$ @ @B@ U1  @ @h-A @ @T!Z @ @B@  @ @PBUL @ @j!Zi @ @U(V*& @ @P4H @ @*@P @ @Z(b$A @ @@ UI @ @@-@k1 @ @ @ *T$@ @ @ I @ @ Phb @ @ P ZL$ @ @B@ U1  @ @h-A @ @T!Z @ @B@  @ @PBUL @ @j!Zi @ @U(V*& @ @P4H @ @*@P @ @Z(b$A @ @@ UI @ @@-@k1 @ @ @ *T$@ @ @ I @ @ Phb @ @ P ZL$ @ @B@ U1  @ @h-A @ @T!Z @ @B`F_]J&jZ9ak;U~bCXiCv3cUWH4ҊմF0í`FR,h)of5}oD7{4KciƎfD$3v6C4fԦ/s7[c 7`R0fVxSu.$hsxMRhu D;/6wCxv&Drq86q 7>/5z<ۅƋ37OtS7s6uwbFalC!lv߱XèMjDBJ,dxQ"cAW1l'_pqV8^NozqtlLu׏O @ @ @ӯ  @ @ нh" @ @ PSКN @ @^@{C @ @hM'FZ @ @t/ڽ @ @T@#- @ @PP @ @j*ZӉ @ @ (vo( @ @5PH @ @@7 @ @ (tbE @ @@ @ @ @@M@k:1"@ @ @{ E @ @ @ 5i @ @ нh" @ @ PSКN @ @^@{C @ @hM'FZ @ @t/ڽ @ @T@#- @ @PP @ @j*ZӉ @ @ (vo( @ @5PH @ @@7 @ @ (tbE @ @@ @ @ @@M@k:1"@ @ @{ E @ @ @3j @V@ছnJfofϞ-Z.t7=iimMCCC .L_zg>3mr뭷w;(zva[/y{?>mviwN3gLw__Zۛoy3uO;I+ @B`5LL%I LZ+{]tQS.>K.T?M믿~zߞN8}m)#=أ8si}\m]EcmowL>==N?O+e<['@<:yJ @@>s޼yӟtQrPɹ6ۤO>(RnK\sM{3S|ߘ.}/=yk˗~宻J{͢0},]xNHjn:gM 0 tL  @+"/aυ\Ĵ;C4H*tAޞyǖ[nw:m&餓Nj<[niO}*s9'~v~$[x @-Z @`gv3,tٗ Kg2__n5[K~QiBiY,Ðr2_0e&  @ (~$HX16lf͚5fIOzҘW_}v7ntOկ~U< ~|gkKe|ܟG)aя/kvSe7.Wӂ + ?~}|'z3ʎ3u @% 5_%@Uଳj —KL>`9[No^z;LO;gW~!@轀3@{o*" @`J  XJ8Z`A';o?O)[ni[ @T!ЗK[1{ w{~ _aouX~e.x ֓!ȡ3 N10S6u1^!<+{g8F?B;{xU:/q<>vXSOl2iǏe$>.8sR +8`qR8stat$v`2}^Xz-{-x1%͞="Hwz)O /O -ým74q8}K4;7藇s+:w#QhXHh=n{HP`Vp0`x~+Op0f0^ 'z97c ˙E۶?z͑/Fo5zoMH0bN1׊7̯h$.pXzHp,#)o0LDˑzw#8h&47Iq:3E🨞%:F36hxݦFkWtI4f@#Xi=cs79@z)uPlӃ5D6SIDmdVV,f+xm~Akb6.)oIY|%^чc1q.[ľwى @ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_@¬ @ @!:u} @ @ о0 @ @A(B] @ @E@/:!@ @ @` P' @ @}P N @ @ I @ @@_fh7]@:C@&C#vӂ Mo5`VpxQM @ @@@k<9R#@ @ @;| @ @ (xrF @ @@w 4 @ @5PH @ @@i @ @j,Zɑ @ @ (v @ @X@Ɠ#5 @ @Pϧ  @ @h'Gj @ @t'ڝO @ @ PcO @ @N@;?&@ @ @ 5 @ @ Нhw~>M @ @@@k<9R#@ @ @;| @ @ (xrF @ @@w 4 @ @5PH @ @@i @ @j,Zɑ @ @ (v @ @X`Fs @@͚5+m&}Y7 @ph @&Ӽy?zY @" %m @ @ r$M @ @@D@4  @ @RC&I 0VࡇJwqGshh(mߟ._wm'=iW`kdd$]zoOsO;wnp Ӟ{̙H^n_?mi[g.\XoΞ=;mE_iJx3Қk|J_f.3gc6 @@@?G2$@L(p%8hw_:cgr\wtg[zW ,>?5s\:ꨣƼ3_җ#<2潼N;~E1כb^{9(M>kI/x 7\]dO=җ\YJ 0@'ߜɘ \f?%]tEiwNoӺ뮻K(n,G}׽#,VrqV;0ś뮻[neyo{ 7ܐr~ڹ3b8∴馛)X:c['@\:K @ -ZT?jt'g`3)%?rsF#]JeO~r~򓟤iWoSNi_yg>[3 ӟF|ύ_gug>K'pBʗK%?_קoC)JD{{e` @`R 8tRN  @x.체k )\,ﯹh>`:cW_]\j/9gkiV|,|Yz"\͛7/j%;czSZ6]k>盗?׿uwnŽNr?+;v+ @R@tRN  @x[.~3fHw\ 4Q4P7.Y>2?)?\}Ge뭷.W/>쓞礗cl7^__:7S>,v^c @PtS&a @o3773=8#p ӏ_2K=?;2/g4?u>\pя~TI{`-klƼU^>_de&@\ kdK ̝;wvk}w}emLxuY'tMG>%qz {u]ߋeZ̙3ӧs yʌe|  @KK\y˖ @`9~cwn.u=Isv3[4?(??c.,L`}xч>|6tw.sy7>`7c6 @P|f)?}3F} 7lNguV{;:裏N^{ UW]5~ʶuܬd}eRI2 @M=@F# @@zeť{nq)zA~"|.Nt>=8_Wc=6-Xv|&#~E]rnҵ^[n8/}iO{30o, ^XzX @p |H\OLO={vТ\0e%? ?Ø& gD;/?餓駟vi1-7:l}ݷUk7c41  @*9}'@\ /LyS,̗}-?U/}h 24<}6eؗ /vߡ`zt/F$pm=zۥF0hKnrKY8Z=C j }7sI3:ޠ_fp2lDm?O8b`s ZǏX9  @ @苀h_uB @ @ @O @ @"f @ @ 0A @ @(Y' @ @ B@t$@ @ @/ }a  @ @P>  @ @苀h_uB @ @ @O @ @"f @ @ 0A @ @(Y' @ @ B@t$@ @ @/ }a  @ @P>  @ @苀h_uB @ @ @O @ @"f @ @ 0A @ @(Y' @ @ B` :' @@}t뭷oFiΜ9^4tצ7Em&͛7"W1 @dP @`\wuiwlOtP{ە믿>icB͟??}s @.3! @@Ϝ;\̥F Xpc0~ @@@o}[C=g"hB @`0 q+ @m]{qXcz+Ƅxӛޔg @@@8+r"@@H۟={v9sfhѢtmr-Gy$]ve))OyJaҬY|}y%_ 7UW]5mcI+2"l/4444]xҝwY1cFn…?qZs5ӳ*/,=qKkv~-_iV+.Khr׿u믟~'>qM @I(0]&aR&@'pW/!Hk<}HO?gw嗧=iK6tQGﾻUn3Lַҋ_b߆n=ܴ~\K.;W:r!k)9#2%_׼&}cƜm&K_R:6 @$I>'@G,Qgcpi>N8?g7ޘk}m~Z?sv-͝;wg⊴{,Q̍r7 c|\a; e|6ho|c+ @P"i @83.R-ψrɗ_,6]w׽.tAaVы^TlK?v\q?Ϧڪ؟/Nʗ/mɅ|I9s|x+hz{ｷ(twypR8i/\ge}Iz-|3v @` DC @@E]Zk⣹ w}vyfm/GKswc.׻>4C4_}ՋXl\Hͅ|͓N:).O.:eK[-1%u/oυмwQ\>o\4-\̟/-œob??߿+ @p7Y @?~=Onm;{xXJ~Q/h\.ru\ϼbh~%V_g>sLٮ|_nAH^r]w| @`j8tj̣Q @VH ?}yOi/?c yyFi^_`A~YN;-u7|'wv柟H_.UPÕ- @_@tϡ @VX gsﹹ2K~J{ruץgYK.Z%}~Dˊy?}vzunP$  @Ph @9s _^E|O}wyIiie3؊㋵eM^  @&; @j!=xPy>=:׿ne~.׿Nߋ\:?Lom @WC&ɜ P=y\~3-sa4m]v+ӧO헿 .L)|S;?c @`r (N= @w\f3OL'|r:S>tdd$xam:+"1S}S\=S'c]"~.HsɗLGqD:3=ASJk+ @pDC @A /䒔Ϩ5k֘6|~6} _h):AN;}M7[s65  @/0]&0 @NF#]wuťf*2cΗx)?}K[ou1ÅQ+c3 @ :fI @ @KW͇ @ @ }֧~Z =FZNئl0|\]kho6GbGj5bcw(r9XۡGƄ_pg#K4^iD¥Xhh#P)n8o8xg޶kSPM!ظ1ncFb*c4Fplhf,^F4}m9i #o;4Z9 DmcnFlus2stu4ḢMc0loEV,f#خlS;cFp-Xו^jȊ/ ѯQ`)2/:'ߒ#K+.NJ%w[)֮nn.Lvb6i_zC9-_+ho+蒭ma+[x_Xv8x)/:<')3za/L+o_ _G)zŊw=mkJh+/ K|JGIiMkjM`h C-f`?)Z(~ˍht/[b[`~Rڊ -+ xc!ohA0-5'\fH]4 ѱ ,J,./:/.Fcv*F[<'_W}MV /yXюI+da4^a]p{b1Xm&{ P5Ŏ@D x@c/1hH|Ty: @ @ @@@{o*" @ @5PDH @ @ (TD @ @j"Z @ @P @ @D@&!  @ @z/{S  @ @hM&B @ @^@" @ @ PКL4 @ @轀hME$@ @ @& 5i @ @ {ޛH @ @@M@k2 @ @ @ 7 @ @(d"A @ @@@{o*" @ @5PDH @ @ (TD @ @j"Z @ @P]{ɍ"G2n0."Y*ge @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @CC  @ @о @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @CC  @ @о @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @CC  @ @о @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @CC  @ @о @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @CC  @ @о @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @CC  @ @о @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @CC  @ @о @ @ 6 @ @ @* @ @ 0D@:d @ @ @/ 훪H @ @Ah @ @o" @ @C>>G9q l/Yy پ#w\=ٹ#{>Kg޸K=^ilw ³~?Ӿrw8#w?Kgߏ>7WĚ}5;p_:^x?f|Ѿueդ}B|n4Gy>»ᷧJg<пg;Ngs }Kmҳ㻤u,B밽zIk9-KgmҙYlCӻ\z;/\Gd_/).i;G/{+ >_0;o^yYIg]ﶝ+  @ @ 0S / 3{ @ @%E @ @v<= @ @ .y, @ @ t @ @tc @ @;OO @ @,K @ @, yzz'@ @ @`) ]X$@ @ @`g; @ @K" @ @; @w  @ @X @<  @ @Y@N @ @R@H @ @Нw @ @%E @ @v<= @ @ .y, @ @ t @ @tc @ @;OO @ @,K @ @, DgCNIENDB`viridisLite/man/viridis.map.Rd0000644000177500001440000000115013056345537016360 0ustar deepayanusers% Generated by roxygen2: do not edit by hand % Please edit documentation in R/viridis.R \docType{data} \name{viridis.map} \alias{viridis.map} \title{Original 'viridis' color map} \format{A data frame with 1024 rows and 4 variables: \itemize{ \item R: Red value \item G: Green value \item B: Blue value \item opt: The colormap "option" (A: magma; B: inferno; C: plasma; D: viridis) }} \usage{ viridis.map } \description{ A dataset containing the original RGB values of the default Matplotlib color map ('viridis'). Source: \url{https://github.com/BIDS/colormap/blob/master/option_d.py}. } \keyword{datasets} viridisLite/man/viridis.Rd0000644000177500001440000000662713056345537015622 0ustar deepayanusers% Generated by roxygen2: do not edit by hand % Please edit documentation in R/viridis.R \name{viridis} \alias{viridis} \alias{viridisMap} \alias{magma} \alias{inferno} \alias{plasma} \title{Matplotlib 'viridis' color map} \usage{ viridis(n, alpha = 1, begin = 0, end = 1, direction = 1, option = "D") viridisMap(n = 256, alpha = 1, begin = 0, end = 1, direction = 1, option = "D") magma(n, alpha = 1, begin = 0, end = 1, direction = 1) inferno(n, alpha = 1, begin = 0, end = 1, direction = 1) plasma(n, alpha = 1, begin = 0, end = 1, direction = 1) } \arguments{ \item{n}{The number of colors (\eqn{\ge 1}) to be in the palette.} \item{alpha}{The alpha transparency, a number in [0,1], see argument alpha in \code{\link[grDevices]{hsv}}.} \item{begin}{The (corrected) hue in [0,1] at which the viridis colormap begins.} \item{end}{The (corrected) hue in [0,1] at which the viridis colormap ends.} \item{direction}{Sets the order of colors in the scale. If 1, the default, colors are ordered from darkest to lightest. If -1, the order of colors is reversed.} \item{option}{A character string indicating the colormap option to use. Four options are available: "magma" (or "A"), "inferno" (or "B"), "plasma" (or "C"), and "viridis" (or "D", the default option).} } \value{ \code{viridis} returns a character vector, \code{cv}, of color hex codes. This can be used either to create a user-defined color palette for subsequent graphics by \code{palette(cv)}, a \code{col =} specification in graphics functions or in \code{par}. \code{viridisMap} returns a \code{n} lines data frame containing the red (\code{R}), green (\code{G}), blue (\code{B}) and alpha (\code{alpha}) channels of \code{n} equally spaced colors along the 'viridis' color map. \code{n = 256} by default, which corresponds to the data from the original 'viridis' color map in Matplotlib. } \description{ This function creates a vector of \code{n} equally spaced colors along the Matplolib 'viridis' color map created by \href{https://github.com/stefanv}{Stéfan van der Walt} and \href{https://github.com/njsmith}{Nathaniel Smith}. This color map is designed in such a way that it will analytically be perfectly perceptually-uniform, both in regular form and also when converted to black-and-white. It is also designed to be perceived by readers with the most common form of color blindness. } \details{ \if{html}{Here are the color scales: \out{
}\figure{viridis-scales.png}{options: style="width:750px;max-width:90\%;"}\out{
} } \if{latex}{Here are the color scales: \out{\begin{center}}\figure{viridis-scales.png}\out{\end{center}} } \code{magma()}, \code{plasma()}, and \code{inferno()} are convenience functions for the other colormap options, which are useful the scale must be passed as a function name. Semi-transparent colors (\eqn{0 < alpha < 1}) are supported only on some devices: see \code{\link[grDevices]{rgb}}. } \examples{ library(ggplot2) library(hexbin) dat <- data.frame(x = rnorm(10000), y = rnorm(10000)) ggplot(dat, aes(x = x, y = y)) + geom_hex() + coord_fixed() + scale_fill_gradientn(colours = viridis(256, option = "D")) # using code from RColorBrewer to demo the palette n = 200 image( 1:n, 1, as.matrix(1:n), col = viridis(n, option = "D"), xlab = "viridis n", ylab = "", xaxt = "n", yaxt = "n", bty = "n" ) } \author{ Simon Garnier: \email{garnier@njit.edu}, \href{https://twitter.com/sjmgarnier}{@sjmgarnier} } viridisLite/LICENSE0000644000177500001440000000005312552561530014070 0ustar deepayanusersYEAR: 2015 COPYRIGHT HOLDER: Simon Garnier