How to create a scatter plot using lattice package in R?
This recipe helps you create a scatter plot using lattice package in R
Recipe Objective
Scatter plot is the simplest chart which uses cartesian coordinates to display the relation between two variables x and y. It is used to find any trend or relationship between the two variable.
In this recipe we are going to use Lattice package to plot the required scatter plot. Lattice package provides powerful data visualisation functions which is mainly used for statistical graphics of multivariate data. It is pre-installed in R and is inspired by trellis graphics.
This recipe demonstrates how to plot a simple scatter plot in R using lattice package.
Access House Price Prediction Project using Machine Learning with Source Code
STEP 1: Loading required library and dataset
Dataset description: It is the basic data about the customers going to the supermarket mall. The variables that we are interested in: Annual.Income (which is in 1000s), Spending Score and age
# Data manipulation package
library(tidyverse)
# Lattice package for data visualisation
install.packages("lattice")
library(lattice)
# reading a dataset
customer_seg = read.csv('R_145_Mall_Customers.csv')
glimpse(customer_seg)
Observations: 200 Variables: 5 $ CustomerID 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14,… $ Gender Male, Male, Female, Female, Female, Female, Fe… $ Age 19, 21, 20, 23, 31, 22, 35, 23, 64, 30, 67, 35… $ Annual.Income..k.. 15, 15, 16, 16, 17, 17, 18, 18, 19, 19, 19, 19… $ Spending.Score..1.100. 39, 81, 6, 77, 40, 76, 6, 94, 3, 72, 14, 99, 1…
STEP 2:Plotting a scatter plot using Lattice
We use the xyplot() function to plot a scatter plot between annual income and spending score variables.
Syntax: xyplot(x, data, main = , group = )
where:
- x = variables to be plotted ( "y-axis variable" ~ "x -axis variable")
- data = dataframe to be used
- main = gives the title to the plot
- group = group the points based on a factor variable
xyplot(Annual.Income..k.. ~ Spending.Score..1.100.,
data = customer_seg,
group = Gender,
auto.key = TRUE)
What Users are saying..
Abhinav Agarwal
I come from Northwestern University, which is ranked 9th in the US. Although the high-quality academics at school taught me all the basics I needed, obtaining practical experience was a challenge.... Read More