5 lines
115 B
Text
5 lines
115 B
Text
|
|
mean := proc( a :: indexable )
|
||
|
|
local i;
|
||
|
|
Normalizer( add( i, i in a ) / numelems( a ) )
|
||
|
|
end proc:
|