Honza Páv honzapav

Vanilla JavaScript Quick Reference / Cheatsheet

Just migrated it from Codepen.io to markdown. Credit goes to David Conner.

Working with DOM	Working with JS	Working With Functions
Accessing Dom Elements	Add/Remove Array Item	Add Default Arguments to Function
Grab Children/Parent Node(s)	Add/Remove Object Properties	Throttle/Debounce Functions
Create DOM Elements	Conditionals

	// ----------------------------------------------------------------------------
	// 🚨 STEP 1. 🚨
	// Change 'Test' to the name of your table.
	let table = base.getTable('Test');
	// ----------------------------------------------------------------------------

	// ----------------------------------------------------------------------------
	// 🚨 STEP 2: 🚨
	// Change the following url to your Zapier webhook.
	// To get a Zapier webhook, click the below link, then choose "Catch Hook" as the trigger event

	library(Matrix)
	library(igraph)
	library(plyr)
	library(Rfacebook)
	library(rjson)
	library(Hmisc)

	###########################################################
	# I. stazeni postu a komentaru ze stranky a jejch ulozeni #
	###########################################################

	#
	#
	# https://sites.google.com/site/genbiovis/code/network
	#


	# natazeni knihovny
	library(tm)

	# nacteni korpusu

	# Normalized Compression Distance
	# http://en.wikipedia.org/wiki/Normalized_Compression_Distance
	# Quick and dirty implementation


	ncd <- function(file1, file2) {
	both <- ""
	file1 <- toString(file1)
	file2 <- toString(file2)
	comp1 <- memCompress(file1, type=c(c("bzip2")))

	library(tm)
	require(wordcloud)
	require(RColorBrewer)
	# zde je treba vlozit korpus
	# mydata.vectors <- character(0)
	# mydata.vectors <- c("Dobre dopoledne Mateji,pokud jste pri registraci zvolil Moravskoslezsky kraj, zobrazila se vam v aplikaci informace, ze soutez probehne 30.1. Vcera 31.1. sef gangu navstivil Olomoucky a Zlinsky kraj. Zvoleny kraj naleznete v aplikaci v zalozce "Souboj kraju".Kazdopadne dnes hrajeme o 75 telefonu Samsung GALAXY mini. Online kolo zacina jiz ve 13:00.Drzim palce, Sandra, O2 Guru", mydata.vectors)

	corpus <- Corpus(VectorSource(mydata.vectors))
	corpus <- tm_map(corpus, tolower)
	corpus <- tm_map(corpus, removePunctuation)