Nothing
xsplineTangent.s1neg.s2pos.noA0.A3.y <- function(px0, px1, px2, px3, py0, py1, py2, py3, s1, s2, t) {
((((-t) * ((-t) * ((-t) * (-t) * (-s1) - ((-t) + (-t)) *
(-2 * (-s1) - (-t) * (-s1))) - (2 * (-s1) + (-t) * (-t) *
(-2 * (-s1) - (-t) * (-s1)))) - ((-s1) + (-t) * (2 * (-s1) +
(-t) * (-t) * (-2 * (-s1) - (-t) * (-s1))))) * py0 + (((1/(-1 -
s2) * ((t - 1 - s2)/(-1 - s2)) + ((t - 1 - s2)/(-1 - s2)) *
(1/(-1 - s2))) * ((t - 1 - s2)/(-1 - s2)) + ((t - 1 - s2)/(-1 -
s2)) * ((t - 1 - s2)/(-1 - s2)) * (1/(-1 - s2))) * (10 -
(2 * (-1 - s2) * (-1 - s2)) + (2 * (2 * (-1 - s2) * (-1 -
s2)) - 15) * ((t - 1 - s2)/(-1 - s2)) + (6 - (2 * (-1 - s2) *
(-1 - s2))) * ((t - 1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 -
s2))) + ((t - 1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 - s2)) *
((t - 1 - s2)/(-1 - s2)) * ((2 * (2 * (-1 - s2) * (-1 - s2)) -
15) * (1/(-1 - s2)) + ((6 - (2 * (-1 - s2) * (-1 - s2))) *
(1/(-1 - s2)) * ((t - 1 - s2)/(-1 - s2)) + (6 - (2 * (-1 -
s2) * (-1 - s2))) * ((t - 1 - s2)/(-1 - s2)) * (1/(-1 - s2))))) *
py1 + (((-s1) + t * (2 * (-s1) + t * (8 - 12 * (-s1) + t *
(14 * (-s1) - 11 + t * (4 - 5 * (-s1)))))) + t * ((2 * (-s1) +
t * (8 - 12 * (-s1) + t * (14 * (-s1) - 11 + t * (4 - 5 *
(-s1))))) + t * ((8 - 12 * (-s1) + t * (14 * (-s1) -
11 + t * (4 - 5 * (-s1)))) + t * ((14 * (-s1) - 11 + t *
(4 - 5 * (-s1))) + t * (4 - 5 * (-s1)))))) * py2 + (((1/(1 +
s2) * ((t - 1 + s2)/(1 + s2)) + ((t - 1 + s2)/(1 + s2)) *
(1/(1 + s2))) * ((t - 1 + s2)/(1 + s2)) + ((t - 1 + s2)/(1 +
s2)) * ((t - 1 + s2)/(1 + s2)) * (1/(1 + s2))) * (10 - (2 *
(1 + s2) * (1 + s2)) + (2 * (2 * (1 + s2) * (1 + s2)) - 15) *
((t - 1 + s2)/(1 + s2)) + (6 - (2 * (1 + s2) * (1 + s2))) *
((t - 1 + s2)/(1 + s2)) * ((t - 1 + s2)/(1 + s2))) + ((t -
1 + s2)/(1 + s2)) * ((t - 1 + s2)/(1 + s2)) * ((t - 1 + s2)/(1 +
s2)) * ((2 * (2 * (1 + s2) * (1 + s2)) - 15) * (1/(1 + s2)) +
((6 - (2 * (1 + s2) * (1 + s2))) * (1/(1 + s2)) * ((t - 1 +
s2)/(1 + s2)) + (6 - (2 * (1 + s2) * (1 + s2))) * ((t -
1 + s2)/(1 + s2)) * (1/(1 + s2))))) * py3)/((-t) * ((-s1) +
(-t) * (2 * (-s1) + (-t) * (-t) * (-2 * (-s1) - (-t) * (-s1)))) +
((t - 1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 - s2)) * ((t -
1 - s2)/(-1 - s2)) * (10 - (2 * (-1 - s2) * (-1 - s2)) +
(2 * (2 * (-1 - s2) * (-1 - s2)) - 15) * ((t - 1 - s2)/(-1 -
s2)) + (6 - (2 * (-1 - s2) * (-1 - s2))) * ((t -
1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 - s2))) + t *
((-s1) + t * (2 * (-s1) + t * (8 - 12 * (-s1) + t * (14 *
(-s1) - 11 + t * (4 - 5 * (-s1)))))) + ((t - 1 + s2)/(1 +
s2)) * ((t - 1 + s2)/(1 + s2)) * ((t - 1 + s2)/(1 + s2)) *
(10 - (2 * (1 + s2) * (1 + s2)) + (2 * (2 * (1 + s2) * (1 +
s2)) - 15) * ((t - 1 + s2)/(1 + s2)) + (6 - (2 * (1 +
s2) * (1 + s2))) * ((t - 1 + s2)/(1 + s2)) * ((t - 1 +
s2)/(1 + s2)))) - ((-t) * ((-s1) + (-t) * (2 * (-s1) +
(-t) * (-t) * (-2 * (-s1) - (-t) * (-s1)))) * py0 + ((t -
1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 - s2)) * ((t - 1 -
s2)/(-1 - s2)) * (10 - (2 * (-1 - s2) * (-1 - s2)) + (2 *
(2 * (-1 - s2) * (-1 - s2)) - 15) * ((t - 1 - s2)/(-1 - s2)) +
(6 - (2 * (-1 - s2) * (-1 - s2))) * ((t - 1 - s2)/(-1 - s2)) *
((t - 1 - s2)/(-1 - s2))) * py1 + t * ((-s1) + t * (2 *
(-s1) + t * (8 - 12 * (-s1) + t * (14 * (-s1) - 11 + t *
(4 - 5 * (-s1)))))) * py2 + ((t - 1 + s2)/(1 + s2)) * ((t -
1 + s2)/(1 + s2)) * ((t - 1 + s2)/(1 + s2)) * (10 - (2 *
(1 + s2) * (1 + s2)) + (2 * (2 * (1 + s2) * (1 + s2)) - 15) *
((t - 1 + s2)/(1 + s2)) + (6 - (2 * (1 + s2) * (1 + s2))) *
((t - 1 + s2)/(1 + s2)) * ((t - 1 + s2)/(1 + s2))) * py3) *
((-t) * ((-t) * ((-t) * (-t) * (-s1) - ((-t) + (-t)) * (-2 *
(-s1) - (-t) * (-s1))) - (2 * (-s1) + (-t) * (-t) * (-2 *
(-s1) - (-t) * (-s1)))) - ((-s1) + (-t) * (2 * (-s1) +
(-t) * (-t) * (-2 * (-s1) - (-t) * (-s1)))) + (((1/(-1 -
s2) * ((t - 1 - s2)/(-1 - s2)) + ((t - 1 - s2)/(-1 -
s2)) * (1/(-1 - s2))) * ((t - 1 - s2)/(-1 - s2)) + ((t -
1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 - s2)) * (1/(-1 -
s2))) * (10 - (2 * (-1 - s2) * (-1 - s2)) + (2 * (2 *
(-1 - s2) * (-1 - s2)) - 15) * ((t - 1 - s2)/(-1 - s2)) +
(6 - (2 * (-1 - s2) * (-1 - s2))) * ((t - 1 - s2)/(-1 -
s2)) * ((t - 1 - s2)/(-1 - s2))) + ((t - 1 - s2)/(-1 -
s2)) * ((t - 1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 -
s2)) * ((2 * (2 * (-1 - s2) * (-1 - s2)) - 15) * (1/(-1 -
s2)) + ((6 - (2 * (-1 - s2) * (-1 - s2))) * (1/(-1 -
s2)) * ((t - 1 - s2)/(-1 - s2)) + (6 - (2 * (-1 - s2) *
(-1 - s2))) * ((t - 1 - s2)/(-1 - s2)) * (1/(-1 - s2))))) +
(((-s1) + t * (2 * (-s1) + t * (8 - 12 * (-s1) + t *
(14 * (-s1) - 11 + t * (4 - 5 * (-s1)))))) + t *
((2 * (-s1) + t * (8 - 12 * (-s1) + t * (14 * (-s1) -
11 + t * (4 - 5 * (-s1))))) + t * ((8 - 12 *
(-s1) + t * (14 * (-s1) - 11 + t * (4 - 5 * (-s1)))) +
t * ((14 * (-s1) - 11 + t * (4 - 5 * (-s1))) +
t * (4 - 5 * (-s1)))))) + (((1/(1 + s2) * ((t -
1 + s2)/(1 + s2)) + ((t - 1 + s2)/(1 + s2)) * (1/(1 +
s2))) * ((t - 1 + s2)/(1 + s2)) + ((t - 1 + s2)/(1 +
s2)) * ((t - 1 + s2)/(1 + s2)) * (1/(1 + s2))) * (10 -
(2 * (1 + s2) * (1 + s2)) + (2 * (2 * (1 + s2) * (1 +
s2)) - 15) * ((t - 1 + s2)/(1 + s2)) + (6 - (2 * (1 +
s2) * (1 + s2))) * ((t - 1 + s2)/(1 + s2)) * ((t - 1 +
s2)/(1 + s2))) + ((t - 1 + s2)/(1 + s2)) * ((t - 1 +
s2)/(1 + s2)) * ((t - 1 + s2)/(1 + s2)) * ((2 * (2 *
(1 + s2) * (1 + s2)) - 15) * (1/(1 + s2)) + ((6 - (2 *
(1 + s2) * (1 + s2))) * (1/(1 + s2)) * ((t - 1 + s2)/(1 +
s2)) + (6 - (2 * (1 + s2) * (1 + s2))) * ((t - 1 + s2)/(1 +
s2)) * (1/(1 + s2))))))/((-t) * ((-s1) + (-t) * (2 *
(-s1) + (-t) * (-t) * (-2 * (-s1) - (-t) * (-s1)))) + ((t -
1 - s2)/(-1 - s2)) * ((t - 1 - s2)/(-1 - s2)) * ((t - 1 -
s2)/(-1 - s2)) * (10 - (2 * (-1 - s2) * (-1 - s2)) + (2 *
(2 * (-1 - s2) * (-1 - s2)) - 15) * ((t - 1 - s2)/(-1 - s2)) +
(6 - (2 * (-1 - s2) * (-1 - s2))) * ((t - 1 - s2)/(-1 - s2)) *
((t - 1 - s2)/(-1 - s2))) + t * ((-s1) + t * (2 * (-s1) +
t * (8 - 12 * (-s1) + t * (14 * (-s1) - 11 + t * (4 - 5 *
(-s1)))))) + ((t - 1 + s2)/(1 + s2)) * ((t - 1 + s2)/(1 +
s2)) * ((t - 1 + s2)/(1 + s2)) * (10 - (2 * (1 + s2) * (1 +
s2)) + (2 * (2 * (1 + s2) * (1 + s2)) - 15) * ((t - 1 + s2)/(1 +
s2)) + (6 - (2 * (1 + s2) * (1 + s2))) * ((t - 1 + s2)/(1 +
s2)) * ((t - 1 + s2)/(1 + s2))))^2)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.