Don't like ads? PRO users don't see any ads ;-)
Guest

Untitled

By: a guest on May 22nd, 2012  |  syntax: None  |  size: 0.68 KB  |  hits: 14  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. Having a parameter with subscript and superscript
  2. Needs["Notation`"];
  3.  
  4. Symbolize[
  5. ParsedBoxWrapper[
  6. SubscriptBox["[SelectionPlaceholder]", "[Placeholder]"]]]
  7.  
  8. Symbolize[
  9. ParsedBoxWrapper[
  10. SuperscriptBox["[SelectionPlaceholder]", "[Placeholder]"]]]
  11.        
  12. (1 - t) {Subscript[b, i]^x, Subscript[b, i]^y} +
  13.  t {Subscript[b, i + 1]^x, Subscript[b, i + 1]^y}
  14.        
  15. (1 - t) {Subscript[b, i]^x, Subscript[b, i]^y} +
  16.  t {Subscript[b, i + 1]^x, Subscript[b, i + 1]^y}
  17.        
  18. S[x_,y_,t_,i_]:= (1-t) * {b[i]^x,b[i]^y} + t * {(b[i+1])^x,(b[i+1])^y}
  19.        
  20. Format[S[x_,y_,t_,i_],TraditionalForm] :=
  21.   (1 - t) {Subscript[b, i]^x, Subscript[b, i]^y} +        
  22.   t {Subscript[b, i + 1]^x, Subscript[b, i + 1]^y}