Untitled
#Q1 15+32 #Q2 2^5 28%%6 #Q3 x<-42 x #Q4 my_apples<-20 my_oranges<-6 myfruits<-my_apples+my_oranges #Q5 X<-43 y<-32 ls() rm(list=ls()) horse<-3 dog<-7 animal<-dog+horse ls() rm(dog) ls() #Q6 r<-7 Volume<-2*pi^2*r*3 #Q7 Area<-70*52 Grazed<-pi*28^2/4 Ungrazed<-Area-Grazed #Q8 my_numeric<-42 my_character<-"forty-two" my_logic<-FALSE #Q9 my_apples<-23 my_apples my_oranges<-"ola" my_oranges #error my_fruits<-my_apples+my_oranges #Q10 var1<-TRUE var2<-23 var3<-"ABD" var1_char <- as.character(var1) is.character(var1_char) var2_log<-as.logical(var2) class(var2_log) #warning message var3_num<-as.numeric(var3) #Q2 age<-"12" employed<-"15" salary<-"20000" age_clean<-as.numeric(age) # emplyed clean comes out as NA employed_clean<-as.logical(employed) salary_clean<-as.numeric(salary) #Q12 booleon_vector<-c(TRUE,FALSE,TRUE) #Q13 ProfitOrLoss<-c(12,-10,23,12,-89,-76)
Leave a Comment