joek13

library(shiny)

ui <- fluidPage(
  numericInput(inputId = "n", "Sample size", value = 25),
  plotOutput(outputId="hist")
)

server <- function (input, output) {
  output$hist <- renderPlot ({hist(rnorm(input$n))})
}

joek13

public class MyProgram
{
    public static void main(String[] args) throws RuntimeException
    {
        Triangle[] triangles = new Triangle[] {
            new Triangle(1,1,1),
            new Triangle(3,3,5),
            new Triangle(8,9,8),
            new Triangle(2,2,2),
        };

joek13

    if let Some(value_or_func) = scope.find(&expression.function) {
        if let &ValueOrFunc::Func(ref func) = value_or_func {
            match *func {
                Func::Builtin(f) => {
                    return f(scope, expression.parameters);
                }
                Func::UserDefined(ref block) => Ok(Value::Nil),
            }
        } else {
            return Err(format!("'{}' is not callable", expression.function));

joek13

0xBD4443AC355eFeDc5575044F2Dfe4a0D90735d9A

joek13

Keybase proof

I hereby claim:

• I am joek13 on github.
• I am joek13 (https://keybase.io/joek13) on keybase.
• I have a public key ASDC5xeUpsolfrqeU2N4R4YDGtBusKSzwfKvZ-3gkhANKgo

To claim this, I am signing this object: