1 files changed, 4 insertions, 0 deletions
diff --git a/R/FOMC.R b/R/FOMC.R
new file mode 100644
index 0000000..9358bee
--- /dev/null
+++ b/R/FOMC.R
@@ -0,0 +1,4 @@
+FOMC <- function(t, parent.0, alpha, beta)
+{
+	parent = parent.0 / (t/beta + 1)^alpha
+}