위키에서 참고
https://en.wikipedia.org/wiki/Racket_(programming_language)
#lang racket
(require 2htdp/image) (let triangle_pattern1 ([n 8]) (if (zero? n) (triangle 2 'solid 'red) (let ([t (triangle_pattern1 (- n 1))]) (freeze (above t (beside t t))))))선언빼면 불과 5줄만에 이런 패턴을 그릴 수가 있음.
반응형
'기타' 카테고리의 다른 글
| SIP의 5가지 기능 (10) | 2017.04.20 |
|---|---|
| SIP 소개 (10) | 2017.04.20 |
| [TS 24.229]Procedures at the S-CSCF (12) | 2017.01.25 |
| Windows10에서 Telnet 기능 켜기 (9) | 2016.12.15 |
| R studio(0.99.893) vim mode 설정 안 보임 (10) | 2016.06.07 |