prasad83

; clisp provides (let and let*) combos however has only (flet).
; Using macro we can define flet* as below

(defmacro flet* (&rest body)
  `(labels ,@body))

; example
; (print (flet* ((five-times (n) (* n 5)) 
;                (ten-times (n) (* (five-times n) 2)))
;               (ten-times (b 10)))

prasad83

; Port of Lisp.For.The.Web (Adam Tornhill) 
; Retro Games on MongoDB to Sqlite

; Ensure QuickLoad dependencies
(load "~/.sbclrc") ; or (load "~/.quicklisp/setup.lisp")
(ql:quickload '(cl-who hunchentoot parenscript sqlite) :silent t)

(defpackage :retro-games-sqlite
    (:use :cl :cl-who :hunchentoot :parenscript :sqlite))

prasad83

// Function to check if the the string given is in the array
inArray := func(str string, list []string) bool {
	// early exit if list is nil
	if list == nil {
		return false
	}
	for _, v := range list {
		if v == str {
			return true
		}

prasad83

confusion.glm <- function(data, model) {
  prediction <- ifelse(predict(model, data, type='response') > 0.5, TRUE, FALSE)
  confusion  <- table(prediction, as.logical(model$y))
  confusion  <- cbind(confusion, c(1 - confusion[1,1]/(confusion[1,1]+confusion[2,1]), 1 - confusion[2,2]/(confusion[2,2]+confusion[1,2])))
  confusion  <- as.data.frame(confusion)
  names(confusion) <- c('FALSE', 'TRUE', 'class.error')
  confusion
}

prasad83

Frontend Development

Attention: if you attempt to fork this gist, github will think that you are a spammer and you will have to confirm that you are human with them. Apparantly there are too many links in this list. Also I update it rather frequently (see revisions on the left), so it's probably wise to not fork it anyway.

• Guides
  • Hack Design
  • Designer School
  • TheExpressiveWeb
  • Talks To Help You Become A Better Front-End Engineer In 2013
• Web Development Teaching Materials

prasad83

<?xml version="1.0" encoding="UTF-8" ?>
<schema name="basecamp" version="1.3">
  <types>
    <!-- indexed/stored verbatim -->
    <fieldType name="string"  class="solr.StrField"         sortMissingLast="true" omitNorms="true" omitTermFreqAndPositions="true"/>

    <!-- "true" or "false" -->
    <fieldType name="boolean" class="solr.BoolField"        sortMissingLast="true" omitNorms="true" omitTermFreqAndPositions="true"/>

    <!-- binary data, base64 -->

prasad83

/*
Copyright (c) 2011 Damien Antipa, http://www.nethead.at/, http://damien.antipa.at

Permission is hereby granted, free of charge, to any person obtaining
a copy of this software and associated documentation files (the
"Software"), to deal in the Software without restriction, including
without limitation the rights to use, copy, modify, merge, publish,
distribute, sublicense, and/or sell copies of the Software, and to
permit persons to whom the Software is furnished to do so, subject to
the following conditions: