SHARE
TWEET

Untitled

a guest Jun 25th, 2019 54 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. # Create toy data frame
  2. df <- data.frame(t = c(0, cumsum(runif(100, 0, 10))))
  3. df$T <- (df$t)^0.5
  4. df$S <- (cos(df$t * 0.1) + 1) * 5
  5.  
  6. # Quick peak
  7. head(df, 10)
  8. #>           t        T            S
  9. #> 1   0.00000 0.000000 10.000000000
  10. #> 2   9.82333 3.134219  7.775417364
  11. #> 3  15.55317 3.943750  5.077395727
  12. #> 4  19.09700 4.370011  3.337735036
  13. #> 5  22.64978 4.759179  1.801216275
  14. #> 6  23.12611 4.808962  1.621864060
  15. #> 7  30.09085 5.485512  0.043831684
  16. #> 8  31.18720 5.584550  0.001307812
  17. #> 9  31.97788 5.654899  0.007892638
  18. #> 10 39.18674 6.259932  1.435186018
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top