Color Shadows

xxxxxxxxxx

 

1

print(r.eval("""

2

svg(filename="Rplots.svg",width=6.5,height=4,

3

    pointsize=12,onefile=T,family="sans",bg="white",

4

    antialias=c("default","none","gray","subpixel"))

5

col.lst<-c("skyblue","red2","coral","orchid3",

6

           "bisque","tan","green3","blue4")

7

plot(1:8,rep(1,8),axes=FALSE,pch=15,cex=8,

8

     col=col.lst,xlab=NA,ylab=NA,xlim=c(1,8))

9

axis(1,at=1:8,labels=sprintf("%s",col.lst),

10

     col="white",cex.axis=0.9,padj=-18)

11

dev.off()"""))

Language: Sage Gap GP HTML Macaulay2 Maxima Octave Python R Singular

---

Messages