From 1739e9f5706bb8a73de5dbf0b467de49ea040898 Mon Sep 17 00:00:00 2001
From: Ben Green <bgreen@g.harvard.edu>
Date: Mon, 8 Jun 2015 15:21:51 -0400
Subject: added my R scripts

---
 R Scripts/structural.R | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100755 R Scripts/structural.R

(limited to 'R Scripts/structural.R')

diff --git a/R Scripts/structural.R b/R Scripts/structural.R
new file mode 100755
index 0000000..132aa6c
--- /dev/null
+++ b/R Scripts/structural.R	
@@ -0,0 +1,7 @@
+# structural = function(w1,w2,w3,gamma){
+#   return (plogis(w1,scale=gamma) * plogis(w2,scale=gamma) * plogis(w3,scale=gamma))
+# }
+
+structural = function(delta,dist){
+  return (delta^dist)
+}
\ No newline at end of file
-- 
cgit v1.2.3-70-g09d2