Sponsored links: Algebra eBooks
 

Help Index

A

B

C

D

E

F

G

H

I

J

K

L

M

N

O

P

Q

R

S

T

U

V

W

X

Y

Z

The Maxima on-line user's manual

Algebra Calculator

Search:

Divsum Calculator

Divsum

Function: divsum (<n>, <k>)

d(n):=divsum(n)-n;
isa(n):=if d(d(n))=n then true else false;
c:0;
 for i : 1 thru 10000 do (if isa(i) then (print(i), c:c+i));
print(c);

Function: divsum (<n>) divsum (<n>, <k>) returns the sum of the divisors of <n> raised to the <k>th power.

divsum (<n>) returns the sum of the divisors of <n>.

          (%i1) divsum (12);
          (%o1)                          28
          (%i2) 1 + 2 + 3 + 4 + 6 + 12;
          (%o2)                          28
          (%i3) divsum (12, 2);
          (%o3)                          210
          (%i4) 1^2 + 2^2 + 3^2 + 4^2 + 6^2 + 12^2;
          (%o4)                          210

(%o1)                                true
(%i2) 

Divsum Example

Related Examples

divsum-do-print

d(n):=divsum(n)-n;

isa(n):=if d(d(n))=n ...

c:0;

Calculate

divsum-do-print

d(n):=divsum(n)-n;

isa(n):=if d(d(n))=n ...

for i : 2 thru 100 do...

Calculate

divsum-do-print

d(n):=divsum(n)-n;

isa(n):=if d(d(n))=n ...

c:0;

Calculate

divsum-do-print

d(n):=divsum(n)-n;

isa(n):=if d(d(n))=n ...

c:0;

Calculate

divsum-print

print(divsum(220));

Calculate

divsum-do-print

d(n):=divsum(n)-n;

isa(n):=if d(d(n))=n ...

c:0;

Calculate

divsum

d(n):=divsum(n)-n;

isa(n):=if d(d(n))=n ...

isa(220);

Calculate

divsum-print

print(divsum(220));

Calculate

divsum-do-print

d(n):=divsum(n)-n;

isa(n):=if d(d(n))=n ...

c:0;

Calculate

divsum

divsum(220,1);

Calculate