Colors
The command colors()
shows 657 built in color names in R.
Here is an website called datalab which shows all the colors sample, name, hex code, rgb code in detail - https://datalab.cc/rcolors
Qualified programming assignment help.
For example let’s create a bar chart -
> x <- c(10,8,6,5,2,1)
> barplot(x)

Using colors name -
> barplot(x, col="cadetblue")

Using hex code -
> barplot(x, col="#5F9EA0")

Using multiple colors for multiple bars using colors index -
> barplot(x, col=colors()[c(11:16)])

This can also be done using other color calling methods.
Color Palettes
Group of colors/Palettes are used in R to make the visualizations more attractive and meaningful. Some of them are discussed here.
Built in Color Palettes
Built in color palette in R can be used by palette()
. Running it in command will show the colors in it-
> palette()
[1] "black" "#DF536B" "#61D04F" "#2297E6" "#28E2E5" "#CD0BBC" "#F5C710"
[8] "gray62"
> barplot(x, col=palette())

Let’s use the built in color palettes in our example -
> par(mfcol = c(3,2)) # to show plots in 2 rows and 3 columns
> barplot(x, col = rainbow(6), xlab="Rainbow colors", sub="rainbow(n)")
> barplot(x, col = heat.colors(6), xlab="Yellow through red", sub="heat.colors(n)")
> barplot(x, col = terrain.colors(6), xlab="Gray through green(n)", sub="terrain.colors(n)")
> barplot(x, col = topo.colors(6), xlab="Purple through tan", sub="topo.colors(n)")
> barplot(x, col = cm.colors(6), xlab="Pinks and blues", sub="cm.colors(n)")

RColorBrewer Color palettes
Install the pacman package using install.packages("pacman")
and load RColorBrewer -
> library(pacman)
> library(RColorBrewer)
Display all color palettes with their names -
> display.brewer.all()

Let’s use one of the palettes -
> barplot(x, col = brewer.pal(6,"Set1"))

Sequential Palettes
The palettes are - Blues, BuGn, BuPu, GnBu, Greens, Greys, Oranges, OrRd, PuBu, PuBuGn, PuRd, Purples, RdPu, Reds, YlGn, YlGnBu, YlOrBr, YlOrRd.
> display.brewer.all(type="seq")

To see the BuPu palette with 7 colors -
> display.brewer.pal(7,"BuPu")

Diverging Palettes
The palettes are - BrBG, PiYG, PRGn, PuOr, RdBu, RdGy, RdYlBu, RdYlGn, Spectral.
> display.brewer.all(type="div")

To see the PRGn palette with 7 colors -
> display.brewer.pal(7,"PRGn")

Qualtative Palettes
The palettes are -
Accent (8), Dark2 (8), Paired (12), Pastel1 (9), Pastel2 (8), Set1 (9), Set2 (8), Set3 (12)
> display.brewer.all(type="qual")

To see the Accent palette with 4 colors -
> display.brewer.pal(4,"Accent")

Wes Anderson Palettes
Details can be found here - https://github.com/karthik/wesanderson
Let’s load the package for this using p_load() from pacman package and load in the current workspace -
> p_load(wesanderson)
> library(wesanderson)
Let’s see the name of the palettes -
> names(wes_palettes)
[1] "BottleRocket1" "BottleRocket2" "Rushmore1" "Rushmore"
[5] "Royal1" "Royal2" "Zissou1" "Darjeeling1"
[9] "Darjeeling2" "Chevalier1" "FantasticFox1" "Moonrise1"
[13] "Moonrise2" "Moonrise3" "Cavalcanti1" "GrandBudapest1"
[17] "GrandBudapest2" "IsleofDogs1" "IsleofDogs2"
Let’s use one of the palettes -
> barplot(x, col= wes_palette("Zissou1"))

LS0tDQp0aXRsZTogIkNvbG9ycyBhbmQgQ29sb3IgUGFsZXR0ZXMgaW4gUiINCmF1dGhvcjogTUQgQUhTQU5VTCBJU0xBTQ0Kb3V0cHV0OiANCiAgaHRtbF9kb2N1bWVudDoNCiAgICB0b2M6IHRydWUNCiAgICB0b2NfZmxvYXQ6IHRydWUNCiAgICB0b2NfZGVwdGg6IDUNCiAgICB0aGVtZTogY2VydWxlYW4NCiAgICBjb2RlX2Rvd25sb2FkOiB0cnVlDQotLS0NCg0KYGBge3IsIGluY2x1ZGU9RkFMU0V9DQprbml0cjo6b3B0c19jaHVuayRzZXQoDQogIGNvbW1lbnQgPSAiIiwgcHJvbXB0ID0gVFJVRSwgbWVzc2FnZT1GLCB3YXJuaW5nID0gRg0KKQ0KYGBgDQoNCi0tLQ0KDQojIyBDb2xvcnMgDQoNClRoZSBjb21tYW5kIGBjb2xvcnMoKWAgc2hvd3MgNjU3IGJ1aWx0IGluIGNvbG9yIG5hbWVzIGluIFIuIA0KDQpIZXJlIGlzIGFuIHdlYnNpdGUgY2FsbGVkIGRhdGFsYWIgd2hpY2ggc2hvd3MgYWxsIHRoZSBjb2xvcnMgc2FtcGxlLCBuYW1lLCBoZXggY29kZSwgcmdiIGNvZGUgaW4gZGV0YWlsIC0gaHR0cHM6Ly9kYXRhbGFiLmNjL3Jjb2xvcnMNCg0KUXVhbGlmaWVkIFtwcm9ncmFtbWluZyBhc3NpZ25tZW50IGhlbHBdKGh0dHBzOi8vd3d3LmhvbWV3b3JraGVscG9ubGluZS5uZXQgIlByb2dyYW1taW5nIGFzc2lnbm1lbnQgaGVscCIpLg0KDQpGb3IgZXhhbXBsZSBsZXQncyBjcmVhdGUgYSBiYXIgY2hhcnQgLSANCmBgYHtyfQ0KeCA8LSBjKDEwLDgsNiw1LDIsMSkNCmJhcnBsb3QoeCkNCmBgYA0KDQpVc2luZyBjb2xvcnMgbmFtZSAtIA0KYGBge3J9DQpiYXJwbG90KHgsIGNvbD0iY2FkZXRibHVlIikgDQpgYGANCg0KVXNpbmcgaGV4IGNvZGUgLSANCmBgYHtyfQ0KYmFycGxvdCh4LCBjb2w9IiM1RjlFQTAiKQ0KYGBgDQoNClVzaW5nIG11bHRpcGxlIGNvbG9ycyBmb3IgbXVsdGlwbGUgYmFycyB1c2luZyBjb2xvcnMgaW5kZXggLSANCmBgYHtyfQ0KYmFycGxvdCh4LCBjb2w9Y29sb3JzKClbYygxMToxNildKQ0KYGBgDQoNClRoaXMgY2FuIGFsc28gYmUgZG9uZSB1c2luZyBvdGhlciBjb2xvciBjYWxsaW5nIG1ldGhvZHMuDQoNCi0tLQ0KDQojIyBDb2xvciBQYWxldHRlcyANCg0KR3JvdXAgb2YgY29sb3JzL1BhbGV0dGVzIGFyZSB1c2VkIGluIFIgdG8gbWFrZSB0aGUgdmlzdWFsaXphdGlvbnMgbW9yZSBhdHRyYWN0aXZlIGFuZCBtZWFuaW5nZnVsLiBTb21lIG9mIHRoZW0gYXJlIGRpc2N1c3NlZCBoZXJlLiANCg0KLS0tDQoNCiMjIyBCdWlsdCBpbiBDb2xvciBQYWxldHRlcw0KDQpCdWlsdCBpbiBjb2xvciBwYWxldHRlIGluIFIgY2FuIGJlIHVzZWQgYnkgYHBhbGV0dGUoKWAuIFJ1bm5pbmcgaXQgaW4gY29tbWFuZCB3aWxsIHNob3cgdGhlIGNvbG9ycyBpbiBpdC0NCmBgYHtyfQ0KcGFsZXR0ZSgpDQpgYGANCg0KYGBge3J9DQpiYXJwbG90KHgsIGNvbD1wYWxldHRlKCkpDQpgYGANCg0KTGV0J3MgdXNlIHRoZSBidWlsdCBpbiBjb2xvciBwYWxldHRlcyBpbiBvdXIgZXhhbXBsZSAtIA0KYGBge3J9DQpwYXIobWZjb2wgPSBjKDMsMikpICAjIHRvIHNob3cgcGxvdHMgaW4gMiByb3dzIGFuZCAzIGNvbHVtbnMNCmJhcnBsb3QoeCwgY29sID0gcmFpbmJvdyg2KSwgeGxhYj0iUmFpbmJvdyBjb2xvcnMiLCBzdWI9InJhaW5ib3cobikiKSANCmJhcnBsb3QoeCwgY29sID0gaGVhdC5jb2xvcnMoNiksIHhsYWI9IlllbGxvdyB0aHJvdWdoIHJlZCIsIHN1Yj0iaGVhdC5jb2xvcnMobikiKQ0KYmFycGxvdCh4LCBjb2wgPSB0ZXJyYWluLmNvbG9ycyg2KSwgeGxhYj0iR3JheSB0aHJvdWdoIGdyZWVuKG4pIiwgc3ViPSJ0ZXJyYWluLmNvbG9ycyhuKSIpDQpiYXJwbG90KHgsIGNvbCA9IHRvcG8uY29sb3JzKDYpLCB4bGFiPSJQdXJwbGUgdGhyb3VnaCB0YW4iLCBzdWI9InRvcG8uY29sb3JzKG4pIikNCmJhcnBsb3QoeCwgY29sID0gY20uY29sb3JzKDYpLCB4bGFiPSJQaW5rcyBhbmQgYmx1ZXMiLCBzdWI9ImNtLmNvbG9ycyhuKSIpDQpgYGANCg0KLS0tDQoNCiMjIyBSQ29sb3JCcmV3ZXIgQ29sb3IgcGFsZXR0ZXMNCg0KSW5zdGFsbCB0aGUgcGFjbWFuIHBhY2thZ2UgdXNpbmcgYGluc3RhbGwucGFja2FnZXMoInBhY21hbiIpYCBhbmQgbG9hZCBSQ29sb3JCcmV3ZXIgLQ0KYGBge3J9DQpsaWJyYXJ5KHBhY21hbikNCmxpYnJhcnkoUkNvbG9yQnJld2VyKQ0KYGBgDQoNCkRpc3BsYXkgYWxsIGNvbG9yIHBhbGV0dGVzIHdpdGggdGhlaXIgbmFtZXMgLSANCmBgYHtyfQ0KZGlzcGxheS5icmV3ZXIuYWxsKCkNCmBgYA0KDQpMZXQncyB1c2Ugb25lIG9mIHRoZSBwYWxldHRlcyAtIA0KYGBge3J9DQpiYXJwbG90KHgsIGNvbCA9IGJyZXdlci5wYWwoNiwiU2V0MSIpKQ0KYGBgDQoNCiMjIyMgU2VxdWVudGlhbCBQYWxldHRlcw0KVGhlIHBhbGV0dGVzIGFyZSAtDQpCbHVlcywgQnVHbiwgQnVQdSwgR25CdSwgR3JlZW5zLCBHcmV5cywgT3JhbmdlcywgT3JSZCwgUHVCdSwgUHVCdUduLCBQdVJkLCBQdXJwbGVzLCBSZFB1LCBSZWRzLCBZbEduLCBZbEduQnUsIFlsT3JCciwgWWxPclJkLg0KDQpgYGB7cn0NCmRpc3BsYXkuYnJld2VyLmFsbCh0eXBlPSJzZXEiKQ0KYGBgDQoNClRvIHNlZSB0aGUgQnVQdSBwYWxldHRlIHdpdGggNyBjb2xvcnMgLSANCmBgYHtyfQ0KZGlzcGxheS5icmV3ZXIucGFsKDcsIkJ1UHUiKQ0KYGBgDQoNCiMjIyMgRGl2ZXJnaW5nIFBhbGV0dGVzDQoNClRoZSBwYWxldHRlcyBhcmUgLQ0KQnJCRywgUGlZRywgUFJHbiwgUHVPciwgUmRCdSwgUmRHeSwgUmRZbEJ1LCBSZFlsR24sIFNwZWN0cmFsLg0KDQpgYGB7cn0NCmRpc3BsYXkuYnJld2VyLmFsbCh0eXBlPSJkaXYiKQ0KYGBgDQoNClRvIHNlZSB0aGUgUFJHbiBwYWxldHRlIHdpdGggNyBjb2xvcnMgLSANCmBgYHtyfQ0KZGlzcGxheS5icmV3ZXIucGFsKDcsIlBSR24iKQ0KYGBgDQoNCiMjIyMgUXVhbHRhdGl2ZSBQYWxldHRlcw0KDQpUaGUgcGFsZXR0ZXMgYXJlIC0gICANCkFjY2VudCAoOCksIERhcmsyICg4KSwgUGFpcmVkICgxMiksIFBhc3RlbDEgKDkpLCBQYXN0ZWwyICg4KSwgU2V0MSAoOSksIFNldDIgKDgpLCBTZXQzICgxMikNCg0KYGBge3J9DQpkaXNwbGF5LmJyZXdlci5hbGwodHlwZT0icXVhbCIpDQpgYGANCg0KVG8gc2VlIHRoZSBBY2NlbnQgcGFsZXR0ZSB3aXRoIDQgY29sb3JzIC0gDQpgYGB7cn0NCmRpc3BsYXkuYnJld2VyLnBhbCg0LCJBY2NlbnQiKQ0KYGBgDQoNCi0tLQ0KDQojIyMgV2VzIEFuZGVyc29uIFBhbGV0dGVzDQoNCkRldGFpbHMgY2FuIGJlIGZvdW5kIGhlcmUgLSBodHRwczovL2dpdGh1Yi5jb20va2FydGhpay93ZXNhbmRlcnNvbiAgIA0KDQpMZXQncyBsb2FkIHRoZSBwYWNrYWdlIGZvciB0aGlzIHVzaW5nIHBfbG9hZCgpIGZyb20gcGFjbWFuIHBhY2thZ2UgYW5kIGxvYWQgaW4gdGhlIGN1cnJlbnQgd29ya3NwYWNlIC0gDQpgYGB7cn0NCnBfbG9hZCh3ZXNhbmRlcnNvbikNCmxpYnJhcnkod2VzYW5kZXJzb24pDQpgYGANCg0KTGV0J3Mgc2VlIHRoZSBuYW1lIG9mIHRoZSBwYWxldHRlcyAtIA0KYGBge3J9DQpuYW1lcyh3ZXNfcGFsZXR0ZXMpDQpgYGANCg0KTGV0J3MgdXNlIG9uZSBvZiB0aGUgcGFsZXR0ZXMgLSANCmBgYHtyfQ0KYmFycGxvdCh4LCBjb2w9IHdlc19wYWxldHRlKCJaaXNzb3UxIikpDQpgYGANCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0K