I hereby claim:
- I am sellisd on github.
- I am sellisd (https://keybase.io/sellisd) on keybase.
- I have a public key ASAG0oqNdAVzt4zQ63i8nsh39YfU_dZXQ6KDb-JGjZPFNQo
To claim this, I am signing this object:
| from textual.app import App, ComposeResult | |
| from textual.widgets import ListView, ListItem, Label | |
| from textual.containers import Horizontal, Container | |
| from textual.widget import Widget | |
| from textual.reactive import reactive | |
| class Child(Widget): | |
| def __init__(self, parent_widget,**kwargs): | |
| super().__init__(**kwargs) | |
| self.parent_widget = parent_widget |
| import requests | |
| from bs4 import BeautifulSoup | |
| def is_broken(link) -> bool: | |
| response = requests.get(link) | |
| print(response.status_code) | |
| if response: | |
| return True | |
| else: |
| python -m pip install git+https://github.com/sellisd/gitrepodb.git # install gitrepodb tool | |
| # download the 100 top-starred R-language repositories from github | |
| gitrepodb init | |
| gitrepodb query --query "language:R,sort:stars-desc:archived=False" --head 100 --project Rmd | |
| gitrepodb add --basepath ./r_repos | |
| gitrepodb download --project Rmd | |
| # count the total lines of R code | |
| find ./ -name '*.R' |xargs wc -l # gives 198721 total | |
| # count total lines of Rmd files | |
| find ./ -name '*.Rmd' |xargs wc -l # 192270 |
| # install tool for cloning github repositories | |
| python -m pip install git+https://github.com/sellisd/gitrepodb.git | |
| # Clone top 20 (based on star-rating) SQL repositories | |
| gitrepodb init | |
| gitrepodb query --project SQL --query 'language:SQL,sort:stars-desc:archived=False' --head 20 | |
| gitrepodb add --basepath ~/data/ | |
| gitrepodb download --project SQL | |
| find ~/data/ -name *.sql -exec grep 'JOIN' {} \;> join_types.dat |
| library(tidyverse) | |
| a<-numeric(0) | |
| bet<-10 | |
| points<-0 | |
| for(i in c(1:100) { | |
| points <-sample(-1,1)*bet+points | |
| a<-c(a,points) | |
| } |
I hereby claim:
To claim this, I am signing this object:
| a<-c(1,2,3,4) | |
| b<-c(1,2,3,4) | |
| plot(a,b) |