diff --git a/RV_modified.m b/RV_modified.m
new file mode 100644
index 0000000000000000000000000000000000000000..d4a44fd484809aa98ee9c2455870114ea6227f08
--- /dev/null
+++ b/RV_modified.m
@@ -0,0 +1,7 @@
+function [RV]=RV_modified(X,Y)
+AA=X*X';
+BB=Y*Y';
+AA0 = AA - diag(diag(AA),0);
+BB0 = BB - diag(diag(BB),0);
+RV = trace(AA0*BB0)/ssq(AA0)^.5/ssq(BB0)^.5;
+