In[]:=
FourierDCT[{1,1,1,1,1,1,1,1,1,1,1},2]
Out[]=
{3.31662,6.62675×,1.28474×,1.82697×,1.12642×,1.26492×,1.09606×,7.23907×,8.34348×,3.77234×,9.52783×}
-17
10
-16
10
-16
10
-16
10
-16
10
-16
10
-17
10
-17
10
-17
10
-18
10
In[]:=
FourierDCT[{1,1,1,1,1,1,1,1,1,1,1},3]
Out[]=
{4.21568,-1.38603,0.808383,-0.552177,0.402772,-0.301511,0.225709,-0.164638,0.112458,-0.0655898,0.0215645}
In[]:=
N[Sqrt[11],10]
Out[]=
3.316624790