diff --git a/R/multiply.R b/R/multiply.R
new file mode 100644
index 0000000..20b894b
--- /dev/null
+++ b/R/multiply.R
@@ -0,0 +1,8 @@
+This fucntion multiple x with y
+@param x 5
+@param y 2
+@return The product of x and y
+multiply <-function(x,y){
+return(x*y)
+}
+