R Programming Lab - Bsc CS DA and BSC ML And AI -Bharathiar University - Program 1- R Expressions and Data structures

 

 B.Sc Computer Science  

R Programming - Lab  

Bharathiar University

R Expressions and Data Structures 

Program 1 {a}- Write a R program to perform some arithmetic expressions. 

SOURCE CODE:

# R Program for Expressions

# This program demonstrates basic arithmetic expressions in R.

  

# Define variables

a <- 10

b <- 5

 

# Calculate and print the results of different expressions

sum <- a + b

difference <- a - b

product <- a * b

quotient <- a / b

# Print the results

print(paste("Sum:",sum))

print(paste("Difference:", difference))

print(paste("Product:", product))

print(paste("Quotient:", quotient))

Sample  OUTPUT:

# R Program for Expressions > # This program demonstrates basic arithmetic expressions in R. > > # Define variables > a <- 10 > b <- 5 > > # Calculate and print the results of different expressions > sum <- a + b > difference <- a - b > product <- a * b > quotient <- a / b > > # Print the results > print(paste("Sum:",sum)) [1] "Sum: 15" > print(paste("Difference:", difference)) [1] "Difference: 5" > print(paste("Product:", product)) [1] "Product: 50" > print(paste("Quotient:", quotient)) [1] "Quotient: 2"

Program 1 {b}- Write a R program to create various data structures and print them  SOURCE CODE: # R Program for Data Structures # This program demonstrates the use of different data structures in R. # 1. Vectors numeric_vector <- c(1, 2, 3, 4, 5) character_vector <- c("apple", "orange", "banana") # 2. Matrices my_matrix <- matrix(c(1, 2, 3, 4, 5, 6, 7, 8, 9), nrow = 3, ncol = 3) # 3. Lists my_list <- list(name = "Ram", age = 30, hobbies = c("reading", "cricket")) # 4. Data Frame my_data_frame <- data.frame(Name = c("Ram", "Rani", "Raja"), Rollno = c(20, 21, 22), Marks = c(95, 88, 90)) # Print the elements of different data structures print("Numeric Vector:") print(numeric_vector) print("Character Vector:") print(character_vector) print("Matrix:") print(my_matrix) print("List:") print(my_list) print("Data Frame:") print(my_data_frame) SAMPLE OUTPUT > print("Numeric Vector:") [1] "Numeric Vector:" > print(numeric_vector) [1] 1 2 3 4 5 > > print("Character Vector:") [1] "Character Vector:" > print(character_vector) [1] "apple" "orange" "banana" > > print("Matrix:") [1] "Matrix:" > print(my_matrix) [,1] [,2] [,3] [1,] 1 4 7 [2,] 2 5 8 [3,] 3 6 9 > > print("List:") [1] "List:" > print(my_list) $name [1] "Ram" $age [1] 30 $hobbies [1] "reading" "cricket" > > print("Data Frame:") [1] "Data Frame:" > print(my_data_frame) Name Rollno Marks 1 Ram 20 95 2 Rani 21 88 3 Raja 22 90