Instantly share code, notes, and snippets.

View map-routes.R
library(plotKML)
# Find GPX files using a pattern
files <- dir(pattern = "\\.gpx")
# Consolidate routes in one drata frame
index <- c()
latitude <- c()
longitude <- c()
for (i in 1:length(files)) {
View crowdfire.js
$(document).on("click", function() {
$(".js-done-button:visible").closest(".row").hide();
});
View gallery_script.js
View functions.php
<?php
add_action("wp_enqueue_scripts", "my_enqueue", 11);
function my_enqueue() {
wp_deregister_script('jquery');
wp_register_script('jquery', "http" . ($_SERVER['SERVER_PORT'] == 443 ? "s" : "") . "://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js", false, null);
wp_enqueue_script('jquery');
wp_enqueue_script( 'function', get_stylesheet_directory_uri().'/js/gallery_script.js', 'jquery', true);
}
// add actions to respond to get_gallery_data
View template_gallery.php