Skip to content

Instantly share code, notes, and snippets.

View holgerbrandl's full-sized avatar

Holger Brandl holgerbrandl

198 followers · 23 following
View GitHub Profile
@holgerbrandl
holgerbrandl / facet_order_barplot
Last active May 16, 2023 18:49
require(dplyr)
require(ggplot2)
# make sure that purrr package is installed to use purrr::set_names
# aggregate data
df = mpg %>%
group_by(year, manufacturer) %>%
summarize(mixmpg = mean(cty + hwy)) %>%
# create dummy var which reflects order when sorted alphabetically
mutate(ord =sprintf("%02i", as.integer(rank(mixmpg))) )
@holgerbrandl
holgerbrandl / SomethingJsonAdapter.kt
Last active November 7, 2021 13:32
Adapter related to https://github.com/square/moshi/issues/1418
// Code generated by moshi-kotlin-codegen. Do not edit.
@file:Suppress("DEPRECATION", "unused", "ClassName", "REDUNDANT_PROJECTION",
"RedundantExplicitType", "LocalVariableName", "RedundantVisibilityModifier",
"PLATFORM_CLASS_MAPPED_TO_KOTLIN")
package org.kalasim.scratch
import com.squareup.moshi.JsonAdapter
import com.squareup.moshi.JsonReader
import com.squareup.moshi.JsonWriter
@holgerbrandl
holgerbrandl / Toast.java
Created September 28, 2015 07:16
An android like toast inspired by https://github.com/schnie/android-toasts-for-swing
package info.movito.ui;
import javax.swing.*;
import java.awt.*;
import java.awt.event.ActionEvent;
import java.awt.event.ActionListener;
import java.awt.geom.RoundRectangle2D;
class Toast extends JFrame {
@holgerbrandl
holgerbrandl / width-delim-example.txt
Created February 27, 2021 06:32
1 Product 1 Pa wafer 7.28571 25
2 Product 2 Pb wafer 4.28571 25
3 Product 3 test wafer 0.42 25
@holgerbrandl
holgerbrandl / save_file_deconstruction.R
Created October 5, 2020 14:20
pacman::p_load(zeallot)
load_multiple <- function (rdataFile)
{
load(rdataFile, ex <- new.env())
mget(objects(ex, sorted = T), envir = ex)
}
foo = 1
bar = 2
@holgerbrandl
holgerbrandl / zero_bins.ksql
Created January 11, 2020 09:46
CREATE STREAM ratings (title VARCHAR, release_year INT, rating DOUBLE, timestamp VARCHAR)
WITH (kafka_topic='ratings',
key='title',
timestamp='timestamp',
timestamp_format='yyyy-MM-dd HH:mm:ss',
partitions=1,
value_format='avro');
INSERT INTO ratings (title, release_year, rating, timestamp) VALUES ('Die Hard', 1998, 8.2, '2019-07-09 01:00:00');
@holgerbrandl
holgerbrandl / doctopt_with_wrapper.kts
Created August 10, 2017 21:41
kotlin docopt wrapper example
#!/usr/bin/env kscript
//DEPS com.offbytwo:docopt:0.6.0.20150202,log4j:log4j:1.2.14,com.github.holgerbrandl:kscript:1.2.2-SNAPSHOT
//import org.docopt.Docopt
import java.util.*
import kscript.util.DocOpt
//val args = arrayOf("hg19", "/some/where/N.bam", "/some/where/aRG.bam", "/some/where/bRG.bam")
@holgerbrandl
holgerbrandl / add_chr_prefix_to_bw.kts
Last active October 26, 2018 09:08
Rewrites a big-wig file while adding a 'chr' prefix to the chromosome names. Requires `kscript`.Usage `add_chr_prefix_to_bw.kts chrom_sizes.fai in.bw out.bw`
#!/usr/bin/env kscript
// kshell_kts.sh /Users/brandl/.kscript/kscript_tmp_project__adjust_bigwig_ids.kts_1540471113973/src/adjust_bigwig_ids.kts
@file:DependsOn("org.jetbrains.bio:big:0.8.3")
@file:DependsOn("com.xenomachina:kotlin-argparser:2.0.7")
import com.xenomachina.argparser.ArgParser
import com.xenomachina.argparser.DefaultHelpFormatter
import com.xenomachina.argparser.mainBody
import org.apache.log4j.ConsoleAppender
@holgerbrandl
holgerbrandl / RevisedTornadoFxSwingExample.kt
Last active September 14, 2018 07:48
Swing integration example without using unnecessary JFrame
import javafx.application.Platform
import javafx.beans.property.SimpleObjectProperty
import javafx.embed.swing.JFXPanel
import javafx.scene.image.Image
import javafx.stage.Stage
import tornadofx.*
import javax.swing.SwingUtilities
object SwingApp {
private fun createAndShowGUI() {
@holgerbrandl
holgerbrandl / geom_flat_violin.R
Created September 13, 2018 13:36 — forked from dgrtwo/geom_flat_violin.R
# somewhat hackish solution to:
# https://twitter.com/EamonCaddigan/status/646759751242620928
# based mostly on copy/pasting from ggplot2 geom_violin source:
# https://github.com/hadley/ggplot2/blob/master/R/geom-violin.r
library(ggplot2)
library(dplyr)
"%||%" <- function(a, b) {