Homework No.6

  1. Choose two methods from Multidimensional data: direct methods
  2. Make visualizations
  3. Prepare presentation and upload.

Visualizations

1st: Representing realeation among 3 atributes using 2D scater plot and colours as third dimention

Relation between Home value, Year Income

ggplot(insurance_data, aes(x=HOME_VAL, y=INCOME, color=URBANICITY)) +
  geom_point()  + labs(title = "Relation between Home value, Year Income and Urbanicity",  x = "Home value, $", y = "Yeary Income, $")

ggplot(insurance_data, aes(x=HOME_VAL, y=INCOME, color=URBANICITY)) +
  geom_point()  + geom_smooth(method=lm, se=FALSE, fullrange=TRUE) + labs(title = "Relation between Home value, Year Income and Urbanicity",  x = "Home value, $", y = "Yeary Income, $")
## `geom_smooth()` using formula 'y ~ x'


Komentaras

2nd: Representing realeation among 3 atributes using 3D scater plot

Relation between Home value, Year Income and Car value

# x, y and z coordinates
x <- insurance_data$HOME_VAL
y <- insurance_data$INCOME
z <- insurance_data$BLUEBOOK

scatter3D(x, y, z, pch = 18,  theta = 20, phi = 20,
          main = "Realeation of Home value, Income and Car value", xlab = "HOME_VALUE",
          ylab ="INCOME", zlab = "VALUE of VECHLE")

scatter3D(x, y, z, pch = 18,  theta = 20, phi = 0,
          main = "Realeation of Home value, Income and Car value", xlab = "HOME_VALUE",
          ylab ="INCOME", zlab = "VALUE of VECHLE")

scatter3D(x, y, z, pch = 18,  theta = 90, phi = -90,
          main = "Realeation of Home value, Income and Car value", xlab = "HOME_VALUE",
          ylab ="INCOME", zlab = "VALUE of VECHLE")

scatter3D(x, y, z, phi = -45, bty = "g",  type = "h", 
           ticktype = "detailed", pch = 19, cex = 0.5, main = "Realeation of Home value, Income and Car value", xlab = "HOME_VALUE",
          ylab ="INCOME", zlab = "VALUE of VECHLE")


Komentaras

3rd: Matrix of scater plots

Red: First Claim ; Green: Repeated Claim;


Komentaras