Skip to content

Instantly share code, notes, and snippets.

View timcdlucas's full-sized avatar

Tim Lucas timcdlucas

View GitHub Profile
from sympy import *
from sympy import init_printing ;
init_printing()
n, k = symbols('n k')
@@ @
@@@ @@
@@@@@@@@@
@@@@@@@ @ @
@ @ @@@@@
@@ @ @
@@ @ @ @ @
@@@@@@ @@@ @@ @@@@@@@@@
@@@ @@
@@@@@@@ @@@@
@@@@@@@@@@ @@@@@@
@@@@@@@@@@@@@@ @@@@@@@@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@ @@@@@@@@@@@@@@@@@@@@@@@
Installing RRO-8.0-Beta
Reading package lists... Done
Building dependency tree
Reading state information... Done
gcc is already the newest version.
0 upgraded, 0 newly installed, 0 to remove and 20 not upgraded.
Reading package lists... Done
Building dependency tree
Reading state information... Done
make is already the newest version.
R version 3.1.2 (2014-10-31)
Platform: x86_64-pc-linux-gnu (64-bit)
locale:
[1] LC_CTYPE=en_GB.UTF-8 LC_NUMERIC=C
[3] LC_TIME=en_GB.UTF-8 LC_COLLATE=en_GB.UTF-8
[5] LC_MONETARY=en_GB.UTF-8 LC_MESSAGES=en_GB.UTF-8
[7] LC_PAPER=en_GB.UTF-8 LC_NAME=C
[9] LC_ADDRESS=C LC_TELEPHONE=C
[11] LC_MEASUREMENT=en_GB.UTF-8 LC_IDENTIFICATION=C
library(zoon)
sdm <- workflow(SpOcc(species = 'Eresus sandaliatus', extent = c(-10, 45, 10, 65), databases = 'gbif'),
Bioclim(extent = c(-10, 45, 10, 65)),
OneHundredBackground,
RandomForest,
PrintMap
)
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@timcdlucas
timcdlucas / test.html
Created April 22, 2015 21:07
test.html
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8"/>
<script src="lib/htmlwidgets-0.3.2/htmlwidgets.js"></script>
<script src="lib/jquery-1.11.1/jquery.min.js"></script>
<link href="lib/leaflet-0.7.3/leaflet.css" rel="stylesheet" />
<script src="lib/leaflet-0.7.3/leaflet.js"></script>
<link href="lib/leafletfix-1.0.0/leafletfix.css" rel="stylesheet" />
<script src="lib/leaflet-binding-0.0.11/leaflet.js"></script>
@timcdlucas
timcdlucas / scholarCites.R
Created July 23, 2015 21:56
Scrape the number of references found on google scholar.
library(rvest)
library(magrittr)
# Our search string
sp <- "Myotis myotis"
spString <- tolower(gsub(' ', '+', sp))
url <- paste0('https://scholar.google.co.uk/scholar?hl=en&q=%22',