diff --git a/mymath.R.txt b/mymath.R.txt
index adbe785..e18a8b2 100644
--- a/mymath.R.txt
+++ b/mymath.R.txt
@@ -4,4 +4,8 @@ Add <- function(a, b) {
 
 Subtract <- function(a, b) {
 	return (a - b)
-}
\ No newline at end of file
+}
+
+multiply <- function(a, b) {
+    return (a*b)
+    }
\ No newline at end of file