Skip to content

Instantly share code, notes, and snippets.

Show Gist options
  • Save raydsameshima/98343e3fb935748a045137628f234384 to your computer and use it in GitHub Desktop.
Save raydsameshima/98343e3fb935748a045137628f234384 to your computer and use it in GitHub Desktop.
SF expression
(%i1) f: (x+y+x*y)^(-d/2);
1
(%o1) ----------------
d/2
(x y + y + x)
(%i2) makelist ( subst([x=0], diff(f,x,i)), i,0,5);
d (- d/2) - 2 2
(- d/2) - 1 ((- -) - 1) d y (y + 1)
1 d y (y + 1) 2
(%o2) [----, - ----------------------, - -----------------------------------,
d/2 2 2
y
d d (- d/2) - 3 3
((- -) - 2) ((- -) - 1) d y (y + 1)
2 2
- -----------------------------------------------,
2
d d d (- d/2) - 4 4
((- -) - 3) ((- -) - 2) ((- -) - 1) d y (y + 1)
2 2 2
- -----------------------------------------------------------,
2
d d d d (- d/2) - 5 5
((- -) - 4) ((- -) - 3) ((- -) - 2) ((- -) - 1) d y (y + 1)
2 2 2 2
- -----------------------------------------------------------------------]
2
(%i3)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment