r for data science

r for data science

increasingly popular statistical programming language r for data science. r is popular for statistical computing and statistical analysis.

what is r ?

R is open source language and relatively easy to learn. R is handle huge data sets with incredible data visualization and graphics capabilities. In r data analysis better and faster and allowed them to make better visualizations.

Basics Of R Programming

How to install R Studio ?

  • Step 1 : Download R Studio Given Link Or Already You Have Go To Next Step
  • Step 2: Open .exe File In Windows OS Or Mac Click On .dmg File
  • Step 3: Set Install Location
  • Step 4: Select Start Menu Folder And Shortcuts Create Checklist
  • Step 5: Waiting Installing process then
  • Step 6: Click On Finish

How to install R Packages ?

Write Blow Code in R Studio Code Editor Or R Console

install.packages("package_name")

R Basics

Variable

#Sequences
1:50   # print numbers 1 to 50 to the console
50:1   # print numbers 50 to 1 in reverse order to console

#Sequences continued...
#seq(from = 1, to = 1, by = ((to - from)/(length.out - 1)),length.out = NULL, along.with = NULL, ...)
seq(7, 49, 7) 

 #more parameter use ?funciton_name Example: ?seq

y <- c(3, 5, 8, 1, 2)

#Examining Variables
class(y) # Return y argument character, numeric or logical class 

# Factors Variables
length(y) # Return y argument length
levels(y) #Return the value of the levels of y argument 

#table function
x <- c("a", "a", "b", "b", "b", "c")
table(x)

Programming Basics

While Loop
# While Loop
i <- 1
while (i < 6) {
print(i)
i = i+1
}
if…else statement
#if…else statement
x <- -14
if(x > 0){
print("positive x")
} else {
print("not positive x")
}
For Loop
# For Loop
x<-1:100
for(i in 1:100)
  {
    if(i%%2!=0)
      {
    print(x[i])
      }
  }

Functions

y<-function(k)
  {
    s<-sum(k)
    MEAN<-s/length(k)
    print(MEAN)
  }

Vectors

#Numeric Vectors
y <- c(20, 20, 60)

#Character vectors
datascientist <- c("Programming language","statistics","domain knowledge")

#Connecting Numeric and Character Vectors
names(y) <- datascientist
y

#Subsetting vectors
y[1:2]

Basic Data Wrangling

#data frame
df<-data.frame(x=1:2,y=3:4)

is.na(df) # Return True Or Flash
sum(is.na(df)) # Return Sum Of Null Values

#dplyr
library(dplyr) #  Data Manipulation library
data("ToothGrowth") #load built in data set
View(ToothGrowth) #view data set
?ToothGrowth

Basic Plots

bar plot
#bar plot
barplot(iris$Sepal.Length)
Scatterplots
#Scatterplots
library(ggplot2)
ggplot(iris, aes(x = Sepal.Length, y = iris$Species)) + geom_point()
Histograms
#Histograms
hist(iris$Sepal.Length)
Boxplots
#Boxplots
boxplot(iris$Sepal.Length, horizontal = T)
pie chart

#pie chart
pie(table(iris$Species))

Data import

Read CVS Data File

read.csv(file="rainfall.csv", header = TRUE, sep=",")

Read Or Load Data S, dBase, SPSS, SAS, Stata, Weka, Systat

install.packages("foreign")
library(foreign)   # used to load statistical software packages

indata <- read.spss("election2020.sav")
indataframe <- as.data.frame(indata)
str(indataframe)
summary(indataframe)


install.packages("sas7bdat")  # or install Hmisc
library(sas7bdat)
data(sas7bdat.sources)

Load Or Read ODBC Database

install.packages("RODBC")
library(RODBC)
odbcDataSources()
getwd()

Read SQL Data File

myconn <-  odbcConnectAccess("(Microsoft Access Driver(*.mdb,*.accdb)); Dbq=A.mdb")

Test <- sqlFetch(myconn, "Location")
Test

Data Read Or Load Form Site

install.packages("RCurl")
library(RCurl)
data2 <- getURL("site_url")

Exploratory Data Analysis EDA in R

#load css file from local system

mba <- read.csv("mba.csv")

#Measures of Central Tendency

mean(mba$gmat)
median(mba$gmat)

#mode

getmode <- function(x)
  {
  uniquv <- unique(x)
  uniquv[which.max(tabulate(match(x,uniquv)))]
  }
getmode(mba$gmat)

#Measures of Dispersion
var(mba$gmat)
sd(mba$gmat)
range(mba$gmat)
rangevalue <- function(x)
  {
  max(x)-min(x)
  }
rangevalue(mba$gmat)

#Measures of skewness
install.packages("moments")
library(moments)

#Measures of skewness
skewness(mba$gmat)

#Measures of Kurtosis 
kurtosis(mba$gmat)

#Graphical Representation

#Boxplot
boxplot(mba$gmat,horizontal = TRUE)

#Histogram
hist(mba$gmat)

#Barplot
barplot(mba$gmat)

str(mba)
mba$datasrno <- as.factor(mba$datasrno)

#install.packages(psych)
library(psych)
describe(mba)

# to calculate Z score
qnorm(0.950)#90%
qnorm(0.975)#95%
qnorm(0.995)

#to calculate t score
qt(0.950,772)#0.90%

#qqplot
qqnorm(mba$gmat)
qqline(mba$gmat)

Model building

Linear Regression

#Simple Linear Regression
Salary_hike_Model <- lm(Salary ~ YearsExperience, data = Salary_hike)
summary(Salary_hike_Model)
plot(Salary_hike_Model)

#multiple linear regression
model3 <- lm(price ~ speed + hd + ram + screen + ads + trend + premium, data = ComputerData[-c(1441, 1701),])
summary(model3)
avPlots(model3)

Decision Trees

Decision Trees Model Use C50 library. First Install Or Update C50 packages using install.packages(“C50”) code. set predict and independent variable and build model.

install.packages("C50")
library(C50)

company_train_model <-C5.0(company_train[,-1],company_train$company_sales)
plot(company_train_model)

Random Forest

  • Random Forest develops lots of decision tree based on random selection of data and random selection of variables.
  • Random Forest provides the class of dependent variable based on many trees
  • As the tree are based on random selection of data as well as variables, these are random tree
  • many such random trees leads to a random forest
  • Two major belief
    • Most of the tree can provide correct prediction of class for most part of the data
    • the tree are making mistake at different place
  • That’s why random forest based on voting. for each of the observation and them decide about the class of the observation based on poll result, it is expected to be more close to the correct classification
library(randomForest)

company_train_model <- randomForest(Sales~.,data = company_train,na.action=na.roughfix,importance=TRUE)
company_train_model
plot(company_train_model)
company_train_pred <- predict(company_train_model,company_train)

Final Outcome R For Data Science

R Programming is open source Language with large community. R have 10,000+ packages. R Is Mostly Use For Visualization And Statistical Analysis. R Is Easy Learnable Better than other language.

Leave a Comment

Your email address will not be published. Required fields are marked *