First Test on RStudio Cloud

print("Hello World")
## [1] "Hello World"
convert_sqm_2_sqft <- function(sq_meters){
  sqin_per_sqm = 39.3 * 39.3
  sqft_per_sqm <- sqin_per_sqm / 144
  return(sq_meters * sqft_per_sqm)
}
tiny_house <- convert_sqm_2_sqft(50)
print(tiny_house)
## [1] 536.2812