Racket

Racket的开发基于以下原则：^[12]

• 编程语言的目的是表述和解决问题，这一过程通常在特定的情境中发生，该情境有一定的描述语言，因此Racket应该是能够创制新编程语言的编程语言；
• 基于上述的表述问题的方式，问题系统可视为多语言的相互联系的组件的集合，Racket应当能够提供足够的保护机制，允许实现各种语言的完整特性；
• 与问题解决相关的在语言之外的机制，如项目和资源的管理，也可被Racket转换为语言构造。

开发

Matthias Felleisen在1990年代中期创建了PLT，一开始为一个研究团队，不久后逐渐投入程序员入门教材的项目开发。

在1995年1月，这个团队决定开发一个创建在 Scheme函数式编程语言上的教学用编程语言环境，Mattew Flatt 简单的从 libscheme 中将 MrEd (Racket 的原始虚拟机)、wxWidgets 与一些其他的免费系统结合，接下来的几年内，由 Flatt、Robby Findler、Shriram Krishnamurthi、Cormac Flanagan 和其他许多人组成的团队推出了 DrScheme，一个给 Scheme 程序设计新手的程序设计环境，也作为弱类型编程语言的研究环境，当时 DrScheme 主要支持的编程语言叫做 PLT Scheme。

在此同时，该团队也开始为中学教师开设研习课程，教授他们学习程序设计与函数式程序设计，这些老师和他们的学生所做的现场测试提供了团对项目开发方向重要的依据，在接下来的几年中，PLT 团队为 DrScheme 加入了教学用语言，例如 代数步进器^[13]、读取-求值-输出循环、constructor-based printer 和其他许多发明，推出了一套有应用价值的程序教学环境。

2001年，核心团队(Felleisen, Findler, Flatt, Krishnamurthi)也编纂和发行了他们的第一本教科书《程序设计方法》，融入了许多他们的教学理念。

在2010年6月7日, PLT Scheme被重命名为Racket^[14]。

杨辉三角形（代码来自：rosettacode）：

#lang racket
(define (next-row row)
  (map + (cons 0 row) (append row '(0))))
 
(define (triangle row rows)
  (if (= rows 0)
      '()
      (cons row (triangle (next-row row) (- rows 1)))))
 
(triangle (list 1) 5)

运行后显示

'((1) (1 1) (1 2 1) (1 3 3 1) (1 4 6 4 1))

绘制迭代8次的 谢尔宾斯基三角形 （代码来自：Racket 官网）：

#lang racket
(require 2htdp/image)

(let sierpinski ([n 8])
  (if (zero? n)
    (triangle 2 'solid 'red)
    (let ([t (sierpinski (- n 1))])
      (freeze (above t (beside t t))))))

在代码的第一行使用 #lang来使用不同的方言. 下面的示例使用 Racket 的一种静态类型的方言 Typed Racket 计算层次结构。

#lang typed/racket

(: fact (Integer -> Integer))
(define (fact n)
  (if (zero? n) 1 (* n (fact (- n 1)))))

• 官方网站