Factors of an integer: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,152: / Line 2,152: @@
 (See: [https://www.microsoft.com/en-us/research/blog/lambda-the-ultimatae-excel-worksheet-function/ The LAMBDA worksheet function in Excel])
-<lang lisp>FACTORS
+<lang lisp>=LAMBDA(n,
-=LAMBDA(n,
     IF(1 < n,
         LET(
@@ Line 2,165: / Line 2,164: @@
             APPEND(lows)(
                 LAMBDA(x, n / x)(
-                    IF(
+                    REVERSE(
-                        froot <> nroot,
+                        IF(froot <> nroot,
-                        REVERSE(lows),
+                            lows,
-                        REVERSE(INIT(lows))
+                            INIT(lows)
+                        )
                     )
                 )