If I were to evaluate cos+A in polar coordinates with being a disk centered at the origin with radius , I would get the answer of:
∫∫
Ω
2
x
2
y
Ω
1
In[]:=
Integrate[Cos[r]r,{θ,0,2π},{r,0,1}]
Out[]=
2π(-1+Cos[1]+Sin[1])
However, if I try using the primitive Disk[], I get :
In[]:=
Integrate[Cos[r]r,{θ,r}∈Region[Disk[{0,0},1]]]
Out[]=
0
Additionally, I tried using the statement without the Region[] function:
In[]:=
Integrate[Cos[r]r,{θ,r}∈Disk[{0,0},1]]
Out[]=
0