Mathematica


shift-Enter
?<Func>
In[1]:= ?Plot
Plot[f,{x,Subscript[x, min],Subscript[x, max]}] generates a plot of f as a function of x from Subscript[x, min] to Subscript[x, max].
Plot[{Subscript[f, 1],Subscript[f, 2],...},{x,Subscript[x, min],Subscript[x, max]}] plots several functions Subscript[f, i]. >>
?<Func>* <Func>
??<Func>


{}
[] 使
== 使





# ref
Map使
Map[StringCount[, Alternatives[#] &, {1,2}]
# Map
Map
/@
Select
TSfilter
&
@
@@
Nest
使
使
constraint
Guard
fac[n_ /; n > 0] := n!
WPower[a_, 0] := 1
WPower[a_, n_ /; EvenQ[n]] := WPower[a*a, (Quotient[n, 2])]
WPower[a_, n_ /; OddQ[n]] := a*WPower[a, (n - 1)]
headtail
Haskell(Head, Tail)(First, Rest)
head h_ , tail t__
ref
(* 210 *)
B2d[{0}] := 0
B2d[{1}] := 1
B2d[{h_, t__}] := 2^(Length[{t}])*h + B2d[{t}]
(* *)
B2d[m_]:=2^(Length[m]-1)*First[m]+B2d[Rest[m]]
clear
ClearAll["Global`*"]