# Day #13 more plots, colors and loess smoothing

[This article was first published on

Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

Yesterday I tried to insert some more R code into knime. scatterplot smoothed density library(“geneplotter”) ## from BioConductor require(“RColorBrewer”) ## from CRAN x1 <- matrix(rnorm(1e4), ncol=2) x2 <- matrix(rnorm(1e4, mean=3, sd=1.5), ncol=2) x <- rbind(x1,x2) layout(matrix(1:4, ncol=2, byrow=TRUE)) op <- par(mar=rep(2,4)) smoothScatter(x, nrpoints=0) smoothScatter(x) smoothScatter(x, nrpoints=Inf, colramp=colorRampPalette(brewer.pal(9,"YlOrRd")), bandwidth=40) colors <- densCols(x) plot(x, col=colors, pch=20) par(op) [...]
**Stageverloop Kris » R-En**, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

To

**leave a comment**for the author, please follow the link and comment on their blog:**Stageverloop Kris » R-En**.R-bloggers.com offers

**daily e-mail updates**about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.

Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.