diff options
| author | Ben Green <bgreen@g.harvard.edu> | 2015-06-08 15:21:51 -0400 |
|---|---|---|
| committer | Ben Green <bgreen@g.harvard.edu> | 2015-06-08 15:21:51 -0400 |
| commit | 1739e9f5706bb8a73de5dbf0b467de49ea040898 (patch) | |
| tree | 6f1d0f166986c5f0757be9b40d8eeb3409ab022c /R Scripts/temporal.R | |
| parent | e5dada202c34521618bf82a086093c342841e5e8 (diff) | |
| download | criminal_cascades-1739e9f5706bb8a73de5dbf0b467de49ea040898.tar.gz | |
added my R scripts
Diffstat (limited to 'R Scripts/temporal.R')
| -rwxr-xr-x | R Scripts/temporal.R | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/R Scripts/temporal.R b/R Scripts/temporal.R new file mode 100755 index 0000000..13194a4 --- /dev/null +++ b/R Scripts/temporal.R @@ -0,0 +1,10 @@ + +temporal = function(tu,tv,alpha){ + dt = tv - tu - 1 + if (sum(dt<0)==0) { + return (alpha*exp(-alpha*dt)) +# return ((0.01/alpha)*(1+dt/alpha)^(-1.01)) + } else { + return (NA) + } +}
\ No newline at end of file |