In-class activity #1

#let us complete some basic operations using R

#Addition
2-3

[1] -1

##[1] -1

#Divison
2/3

[1] 0.6666667

#Exponentiation
2^3

[1] 8

#square root
sqrt(2)

[1] 1.414214

#logarithms
log(2)

[1] 0.6931472

#Question_1: compute the log base 5 of 10 and the log of 10
log(5)

[1] 1.609438

log(10)

[1] 2.302585

log(2.72)#Natural Log(Ln)

[1] 1.000632

#Batting Average=(No. of hits)/(No. of At Bats)
#what is the the batting average of a player that bats 29 hits in 112 at bats?
BA=(29)/(112)
BA

[1] 0.2589286

Batting_Average=round(BA,digits=3)
Batting_Average

[1] 0.259

#Qestion_2: What is the Batting average of a player that bats 42 hits in 212 at bats?
Batting_Average_42=(42/212)
Batting_Average_42

[1] 0.1981132

#On Base Percentage
#OBP=(H+BB+HBP)/(At Bats+H+BB+HBP+SF)
#Let us compute the OBP for a player with the following general stats
#AB=515,H=172,BB=84,HBP=5,SF=6
OBP=(172+84+5)/(515+172+84+5+6)
OBP

[1] 0.3337596

On_Base_Percentage=round(OBP,digits = 3)
On_Base_Percentage

[1] 0.334

#Question_3:Compute the OBP for a player with the following general stats:
#AB=565,H=156,BB=65,HBP=3,SF=7
OBP=(156+65+3)/(565+156+65+3+7)
OBP

[1] 0.281407

3 == 8# Does 3 equals 8?

[1] FALSE

3 != 8# Is 3 different from 8?

[1] TRUE

3 <= 8# Is 3 less than or equal to 8?

[1] TRUE

3>4

# Logical Disjunction (or)
FALSE | FALSE # False OR False

[1] FALSE

# Logical Conjunction (and)
TRUE & FALSE #True AND False

[1] FALSE

# Negation
! FALSE # Not False
``

Total_Bases <- 6 + 5
Total_Bases*3

[1] 33

ls()

[1] "BA"                 "Batting_Average"    "Batting_Average_42" "OBP"               
[5] "On_Base_Percentage" "Total_Bases"       

rm(Total_Bases)

pitches_by_innings <- c(12, 15, 10, 20, 10) 
pitches_by_innings

[1] 12 15 10 20 10

pitches_by_innings <- c(12, 15, 10, 20, 10) 
pitches_by_innings