Untitled

R |

1.34 KB

None

0 👍

0 👎

Raw Download Clone Embed Print View

---
output: html_document
runtime: shiny
---
 
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
 
pacman::p_load(
  tidyverse,
  gtrendsR,
  sf,
  leaflet
)
```
 
# Tendencias de México
 
```{r eruptions, echo=FALSE}
 
statesJSON <- st_read("mx-states.geo.json")
 
```
 
```{r}
 
inputPanel(
  textInput(
    inputId="keyword",
    label="Término de búsqueda:",
    value="Google I/O",
    placeholder="Bitcoin"
  )
)
 
```
 
```{r states}
 
colors <- colorNumeric("RdYlBu",domain=states$hits)
 
renderLeaflet({
  # 23.6345° N, 102.5528° W
  leaflet(states) %>%
    addTiles() %>%
    setView(lat=23.6345,lng=-102.5528,zoom=4) %>%
    addPolygons(
      weight=1,
      color="#232323",
      opacity=0.8,
      fillOpacity=0.8,
      fillColor=colors(states$hits)
    )
})
```
 
```{r statesJSON}
 
renderTable({
  trends <- gtrends(
    keyword=input$keyword,
    geo="MX",
    tz="America/Mexico_City",
    time="now 7-d"
  )
  trends <- trends$interest_by_region
  trends$name <- trends$location
  trends <- trends %>%
    mutate(
      name=case_when(
       name=="State of Mexico" ~ "Estado De Mexico",
       name=="Mexico City" ~ "Ciudad De Mexico",
       !is.na(name) ~ name
      )
    )
  states <- statesJSON %>% left_join(trends,by="name")
  trends %>% select(-name)
})
```

Comments

CSS |

0 B

0 👍

0 👎

Raw Download Clone Embed Print View

✅ 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).

01/01/70 12:00:00 AM UTC
Plain Text |
0 B
|
👍
/
👎

Pasted

Untitled

Comments