jorandradefig icon

shiny.R

jorandradefig | PRO | 06/13/21 07:14:06 PM UTC | 0 ⭐ | 8840 👁️ | Never ⏰ | []
R |

780 B

|

None

|

0 👍

/

0 👎

pacman::p_load(
  tidyverse,
  plotly,
  shiny
)
 
ui <- fluidPage(
  sidebarLayout(
    inputPanel(
      selectInput(
        inputId="type",
        label="Tipo:",
        choices=unique(trend_data$type),
        selected="advert"
      )
    ),
    mainPanel(
      plotOutput(
        outputId="plot"
      ),
      tableOutput(
        outputId="table"
      )
    )
  )
)
 
server <- function(input,output) {
  trend_data <- read_csv("jorandradefig/193/input/google-trends/trend_data.csv")
  output$table <- renderTable({
    trend_data %>%
      filter(type == input$type)
  })
  
  output$plot <- renderPlot({
    data <- trend_data %>%
      filter(type == input$type)
    ggplot(data,aes(x=date,y=close)) +
      geom_line()
  })
}
 
shinyApp(ui,server)

Comments

  • Venzetis icon
    03/30/26 01:51:46 AM UTC
    CSS |

    0 B

    |

    0 👍

    /

    0 👎

    ✅ Leaked Exploit Documentation:
     
    https://docs.google.com/document/d/1dOCZEHS5JtM51RITOJzbS4o3hZ-__wTTRXQkV1MexNQ/edit?usp=sharing
     
    This made me $13,000 in 2 days.
     
    Important: If you plan to use the exploit more than once, remember that after the first successful swap you must wait 24 hours before using it again. Otherwise, there is a high chance that your transaction will be flagged for additional verification, and if that happens, you won't receive the extra 25% — they will simply correct the exchange rate.
    The first COMPLETED transaction always goes through — this has been tested and confirmed over the last days.
     
    Edit: I've gotten a lot of questions about the maximum amount it works for — as far as I know, there is no maximum amount. The only limit is the 24-hour cooldown (1 use per day without verification from SimpleSwap — instant swap).
    
  •  icon
    01/01/70 12:00:00 AM UTC
    Plain Text |

    0 B

    |

    👍

    /

    👎