How to Make Fibonacci Confusing
前几天同事发了这么一段代码:
(fn =>
(f => f(f))(f => fn(n => f(f)(n))))(g => n =>
[1, 2].indexOf(n) > -1 ? 1 : g(n - 1) + g(n - 2)
)(10);
你看这段代码时,一定是这样的心情:
好端端的 斐波那契
是怎么变成这样的,因吹斯听,我们来回放一下。
从正常的写法开始:
const fib = n =>
[1, 2].indexOf(n) >= 0
? 1
: fib(n - 1) + fib(n - 2);
为了让上面看起来不像递归,改写一下,把递归调用改成调用参数 g
:
const wrappedFib = g => n =>
[1, 2].indexOf(n) >= 0
? 1
: g(n - 1) + g(n - 2);
不管 g
传什么,例如就传 null
,1,2 两项都可以计算了,因为压根和 g
无关。
wrappedFib(null)(1);
wrappedFib(null)(2);
如果要计算第 3 项,那么 g
可以是 wrappedFib(null)
。
let g = wrappedFib(null);
wrappedFib(g)(3);
同理,第 4 项:
let g = wrappedFib(wrappedFib(null));
wrappedFib(g)(4);
第 5 项......第 N 项我就不列了。
看起来需要构造一个 g
,它由无限层 wrappedFib
组成。
递归的思想:
const g = n => wrappedFib(g)(n);
运行一下试试吧:
const wrappedFib = g => n =>
[1, 2].indexOf(n) >= 0
? 1
: g(n - 1) + g(n - 2);
const g = n => wrappedFib(g)(n);
console.log(wrappedFib(g)(10));
g
本身是由无限层wrappedFib
组成的,所以wrappedFib(g)
和g
是等价的。因此也可以直接调
console.log(g(10))
。
const g = n => wrappedFib(g)(n);
又看到了明显的递归对不对,试着把它藏起来。思想跟刚开始一样,通过参数传进来。
这段要花点时间理解。
const g = (f => n =>
wrappedFib(f(f))(n))(f => n =>
wrappedFib(f(f))(n)
);
函数本身和函数传参一样,换个写法:
const g = (f => f(f))(f => n =>
wrappedFib(f(f))(n)
);
能到这里,我们和最终的代码已经很接近了。
把 g
中的 wrappedFib
去掉,通过参数 fn
传进来。
const gWaitForWrappedFib = fn =>
(f => f(f))(f => n => fn(f(f))(n));
const g = gWaitForWrappedFib(wrappedFib);
好了,去掉常量的定义,全部连起来吧:
(fn =>
(f => f(f))(f => fn(n => f(f)(n))))(g => n =>
[1, 2].indexOf(n) > -1 ? 1 : g(n - 1) + g(n - 2)
)(10);
拆解这段代码挺烧脑,膜拜一下代码的作者。
更新
读《The Little Schemer》时发现:这段代码和
Y-Combinator
有关。Mark,以后再写个续。
How to Make Fibonacci Confusing的更多相关文章
- 算法与数据结构(九) 查找表的顺序查找、折半查找、插值查找以及Fibonacci查找
今天这篇博客就聊聊几种常见的查找算法,当然本篇博客只是涉及了部分查找算法,接下来的几篇博客中都将会介绍关于查找的相关内容.本篇博客主要介绍查找表的顺序查找.折半查找.插值查找以及Fibonacci查找 ...
- #26 fibonacci seqs
Difficulty: Easy Topic: Fibonacci seqs Write a function which returns the first X fibonacci numbers. ...
- 关于java的递归写法,经典的Fibonacci数的问题
经典的Fibonacci数的问题 主要想展示一下迭代与递归,以及尾递归的三种写法,以及他们各自的时间性能. public class Fibonacci { /*迭代*/ public static ...
- 斐波拉契数列(Fibonacci) 的python实现方式
第一种:利用for循环 利用for循环时,不涉及到函数,但是这种方法对我种小小白来说比较好理解,一涉及到函数就比较抽象了... >>> fibs = [0,1] >>&g ...
- fibonacci数列(五种)
自己没动脑子,大部分内容转自:http://www.jb51.net/article/37286.htm 斐波拉契数列,看起来好像谁都会写,不过它写的方式却有好多种,不管用不用的上,先留下来再说. 1 ...
- POJ3070 Fibonacci[矩阵乘法]
Fibonacci Time Limit: 1000MS Memory Limit: 65536K Total Submissions: 13677 Accepted: 9697 Descri ...
- Fibonacci 数列算法分析
/************************************************* * Fibonacci 数列算法分析 ****************************** ...
- 算法系列:Fibonacci
Copyright © 1900-2016, NORYES, All Rights Reserved. http://www.cnblogs.com/noryes/ 欢迎转载,请保留此版权声明. -- ...
- UVa #11582 Colossal Fibonacci Numbers!
巨大的斐波那契数 The i'th Fibonacci number f (i) is recursively defined in the following way: f (0) = 0 and ...
随机推荐
- rabbitmq消费者“无故消失”
hi,all 导读:9月1号17:12左右,发现影子队列存在大量“unacked”(收到了消息,但是还没有手动确认消息)的消息,一段时间后“unacked”的数量没有减少,但是观察消费者端的日志, ...
- LOJ #6052. 「雅礼集训 2017 Day11」DIV
完了我是数学姿势越来越弱了,感觉这种CXRdalao秒掉的题我都要做好久 一些前置推导 首先我们很容易得出\((a+bi)(c+di)=k \Leftrightarrow ac-bd=k,ad+bc= ...
- PHP全栈学习笔记11
连接MySQL mysql_connect(servername,username,password); 面向对象: <?php $servername = "localhost&qu ...
- git的学习笔记(二):git远程操作
1.创建ssh key ssh-keygen -t rsa -C "your_email@example.com" 执行命令后会在用户的家目录生成.ssh的隐藏文件夹,文件夹里有公 ...
- linux 指令备忘
linux 指令备忘 1.ls [选项] [目录名 | 列出相关目录下的所有目录和文件 -a 列出包括.a开头的隐藏文件的所有文件 -A 通-a,但不列出"."和"..& ...
- .net core中使用autofac进行IOC
.net Core中自带DI是非常简单轻量化的,但是如果批量注册就得扩展,下面使用反射进行批量注册的 public void AddAssembly(IServiceCollection servic ...
- Windows Server 2008 中iis反向代理设置
1.安装 IIS(Windows专业版自带,如果是server版系统,需要通过功能管理器安装(无需下载)) urlrewrite插件,https://www.iis.net/downloads/mic ...
- c# String ,String[] 和 List<String>之间的转换
C#对字符串进行处理时,经常需要进行String,String[]和List<String>之间的转换 本文分析一下它们的差异和转换 一. 1. String > String[] ...
- C# 在PPT中绘制形状(shape)
概述 本篇文章将介绍C# 在PPT幻灯片中操作形状(shape)的方法.这里主要涉及常规形状,如箭头.矩形.圆形.三角形.多边形.不规则形状等.下面的示例中,可以通过绘制形状,并设置相应格式等.示例包 ...
- vue-cli3 中跨域解决方案
此方案只能用于开发环境,线上最好设置同源策略(遇到个后端,装你妈批) 前后端不在同一服务器的情况下,前端要访问后端API,可通过在vue.config.js中配置代理服务器. 0:前提条件 1:安装v ...