Lab 6

[BertLisser]

-- Assignment 3
-- Time: 30 minutes
-- Result:
--                    These are the composite natural numbers between 1 and 100: [8,12,16,18,20,24,27,28,30,32,36,40,42,44,45,48,50,52,54,56,60,63,64,66,68,70,72,75,76,78,80,81,84,88,90,92,96,98,99]
composites :: [Integer]
composites = filter (\x -> length (factors x) > 2) [0..]

are not the complete list of natural numbers. Must become

composites :: [Integer]
composites = filter (\x -> length (factors x) >= 2) [0..]

The report about 4, 5 and 6 is not a direct answer on the question posed in exercise 4.
An answer on 4,5 and 6 can be

Method	K = 1	K = 2	K = 3	K = 4
Composites	9	9	9	85
Carmichael	294409	294409	294409	294409
Miller-Rabin	294409	118901521	118901521	57060521336809