Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //funkcja gestosci
- function(x) {
- if(x < 1) {res <- 0}
- else if (x>=1 && x<2) {res <-(1/3)*x -1/3}
- else if (x>=2 && x<3) {res <- 1/3}
- else if (x>=3 && x<5) {res <- 0}
- else if (x>=5 && x<6) {res <- 1/3}
- else if (x>=6 && x<7) {res <- (-1/3)*x + 7/3}
- else if (x>=7) {res <-0}
- return(res);
- }
- // dystrubanta
- function(x){
- if(x < 1) {res <- 0}
- else if (x>=1 && x<2) {res <-(1/6)*x^2 - (1/3)*x + 1/6}
- else if (x>=2 && x<3) {res <- (1/3)*x -3/6}
- else if (x>=3 && x<5) {res <- (3/6)}
- else if (x>=5 && x<6) {res <- (1/3)*x - 7/6}
- else if (x>=6 && x<7) {res <- (-1/6)*x^2 + (7/3)*x - 43/6}
- else if (x>=7) {res <-1}
- return(res);
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement