R Program to Calculate the Area of a Triangle

In this article, we will discuss how to calculate the Area of a Triangle with its working example in the R programming language. Calculating the area of a triangle is a fundamental geometric task. The area of a triangle can be computed using the base and height of the triangle or by using the lengths of its sides and the semi-perimeter. In this R program, we will explore how to calculate the area of a triangle using the base and height methods.

Syntax:

# Calculate the area of the triangle
area <- 0.5 * base * height
# Print the result
cat("The area of the triangle is:", area)

Example 1:

R




# Values for base and height
base <- 10
height <- 5
 
# Calculate the area of the triangle
area <- 0.5 * base * height
 
# Print the result
cat("The area of the triangle is:", area)


Output:

The area of the triangle is: 25

  • Assigns the value 10 to the variable base, representing the length of the base of the triangle.
  • Assigns the value 5 to the variable height, representing the height of the triangle.
  • Calculates the area of the triangle using the formula 0.5 * base * height and stores the result in the variable area.
  • Uses the cat() function to print the message.

Example 2:

R




# Values for base and height
base <- 10
height <- 10
 
# Calculate the area of the triangle
area <- 0.5 * base * height
 
# Print the result
cat("The area of the triangle is:", area)


Output:

The area of the triangle is: 50

  • Assigns the value 10 to the variable base, representing the length of the base of the triangle.
  • Assigns the value 10 to the variable height, representing the height of the triangle.
  • Calculates the area of the triangle using the formula 0.5 * base * height and stores the result in the variable area.
  • Uses the cat() function to print the message.

Example 3: R Program to Calculate the Area of a Triangle using Side Lengths

R




# Function to calculate the area of a triangle using side lengths
calculateTriangleArea <- function(a, b, c) {
  s <- (a + b + c) / 2
  area <- sqrt(s * (s - a) * (s - b) * (s - c))
  return(area)
}
 
# Input: Lengths of the three sides of the triangle
a <- 5
b <- 5
c <- 5
 
# Calculate the area using the function
triangleArea <- calculateTriangleArea(a, b, c)
 
# Display the result
cat("\nThe area of the triangle with side lengths", a, b, c, "is:", triangleArea, "\n")


Output:

The area of the triangle with side lengths 5 5 5 is: 10.82532 

  • Define a function named calculateTriangleArea that takes three parameters a, b, and c.
  • Inside the function, calculate the semi-perimeter s of the triangle by adding a, b, and c and then dividing by 2.
  • Calculate the area of the triangle using the formula for the area of a triangle given its side lengths: area = sqrt(s * (s – a) * (s – b) * (s – c)).
  • Return the calculated area from the function.
  • Assign the value 5 to variables a, b, and c, representing the side lengths of the triangle.
  • Call the calculateTriangleArea function with the side lengths a, b, and c as arguments. The calculated area is returned and stored in the variable triangleArea.
  • Display a message using cat, indicating the area of the triangle with side lengths a, b, and c, and showing the calculated triangleArea.