Manoel V. Machado ryukinix

Common Lisp Scripting with Roswell

"Roswell Script" is implementation-independent Common Lisp scripting program which uses Roswell. Although Roswell itself is a unified interface to Common Lisp implementations, it also encourages writing scripts with it.

To start writing it, run ros init in your terminal:

$ ros init
Usage: ros init [template] name [options...]

Wallpapers

Install with git git clone https://gist.github.com/85942af486eb79118467.git ~/Pictures/wallpapers

emacs --daemon to run in the background. emacsclient.emacs24 <filename/dirname> to open in terminal

NOTE: "M-m and SPC can be used interchangeably".

Undo - C-/
Redo - C-?
Change case: 1. Camel Case : M-c 2. Upper Case : M-u

Lower Case : M-l

process corpus for lda

In a blog post I wrote about the python package lda, see here, I used the pre-processed data (included with the lda package) for the example. I have since received many questions regarding the document-term matrix, the titles, and the vocabulary-- where do they come from? This gist will use the textmining package to (hopefully) help answer these types of questions.

Haskell: Primeiros passos e bookmarks.

Primeiros passos:

Livros:

Clojure Destructuring Tutorial and Cheat Sheet

(Related blog post)

Simply put, destructuring in Clojure is a way extract values from a datastructure and bind them to symbols, without having to explicitly traverse the datstructure. It allows for elegant and concise Clojure code.

	import argparse
	import urllib.request
	import os
	import img2pdf

	from os import walk
	from os.path import join
	from bs4 import BeautifulSoup

	work_dir = os.path.dirname(__file__)

	(defpackage :BCM2835
	(:use :FFI)
	(:export :init
	:close
	:gpio-fsel
	:gpio-write
	:gpio-lev
	:gpio-set
	:gpio-clr
	:delay

	; Short guide to TCP/IP Client/Server programming in Common Lisp using usockets
	;
	; The main reason for this guide is because there are very few examples that
	; explain how to get started with socket programming with Common Lisp that I
	; could understand. After spending a day trying, I finally came up with a small
	; bit of code that makes it easy to understand the basics. I've written this
	; primarily for myself, but should help others get started as well.

	; As usual, we will use quicklisp to load usocket.

	(ql:quickload 'lispbuilder-sdl)
	(ql:quickload 'lispbuilder-sdl-gfx)
	(ql:quickload 'alexandria)

	(defparameter world (make-array '(100 100) :element-type 'fixnum))

	;; initialize
	(defun init-world! (world)
	(loop for i from 0 to (1- (array-dimension world 0)) do
	(loop for j from 0 to (1- (array-dimension world 1)) do