Skip to content

Instantly share code, notes, and snippets.

View roneyfraga's full-sized avatar

Roney Fraga Souza roneyfraga

18 followers · 8 following
View GitHub Profile
@roneyfraga
roneyfraga / lattes_mestrado_setembro_qualis_novo.R
Last active September 19, 2022 14:16
Análise das publicações dos professores do mestrado em economia da UFMT entre 2021 e setembro de 2022, utilizando o qualis 2017_2020 como referência.
# análise das publicações dos professores do mestrado entre 2021 e setembro de 2022
# utilizando o qualis 2017_2020 como referência
library(getLattes)
library(xml2)
library(dplyr)
library(purrr)
library(tibble)
library(tidyr)
@roneyfraga
roneyfraga / dicsyn.R
Last active September 6, 2019 14:46
#!/usr/bin/env Rscript
# do
# chmod +x dicsyn.R
# run
# ./dicsyn.R idioma termo
suppressMessages(library(rvest))
suppressMessages(library(stringr))
suppressMessages(library(pipeR))
@roneyfraga
roneyfraga / 1.R
Created May 17, 2019 20:04
# ------------------------------
# pacotes a serem carregados
# ------------------------------
library(tidyverse)
library(stringr)
library(Hmisc)
library(downloader)
library(bibliometrix)
library(igraph)
library(pipeR)
@roneyfraga
roneyfraga / unzip_rename.sh
Created September 21, 2015 16:22
# http://www.unix.com/shell-programming-and-scripting/218393-batch-script-unzip-rename-file.html
for i in *.zip
do
n=$(unzip -lqq $i | awk '{print $NF}')
e=${n#*.}
unzip $i && mv $n ${i%%_*}".$e"
rm $i
done
@roneyfraga
roneyfraga / tardownloadfile.R
Created September 20, 2015 12:52
setwd('xmls/')
lfiles = system("ls -lt --full-time | awk -v OFS=' ' 'NR>1 { print $9}' ", intern=TRUE)
head(lfiles)
df <- as.data.frame(lfiles)
df$nchar <- nchar(as.character(df[,1]))
head(df)
table(df[,2])
# > table(df[,2])
@roneyfraga
roneyfraga / process-analysis-tail.R
Last active September 7, 2015 15:10
#!/usr/bin/env Rscript
# to rum this code do:
# chmod +x process-analysis-tail.R
# ./process-analysis.R
# set work directory
if( length(grep('xmls',dir()))>0 ) {
setwd('xmls') } else {
stop('The xmls folder does not exist.')
@roneyfraga
roneyfraga / process-restart.R
Created September 5, 2015 20:44
#!/usr/bin/env Rscript
# to rum this code do:
# chmod +x process-restart.R
# ./process-analysis.R
# disable scientific notation
options(scipen=999)
short <- read.csv('short_ids.csv', header=FALSE)
@roneyfraga
roneyfraga / process-analysis.R
Last active September 7, 2015 01:32
#!/usr/bin/env Rscript
# to rum this code do:
# chmod +x process-analysis.R
# ./process-analysis.R
# set work directory
if( length(grep('xmls',dir()))>0 ) {
setwd('xmls') } else {
stop('The xmls folder does not exist.')
@roneyfraga
roneyfraga / loop lento
Last active August 29, 2015 14:17
# ------------------------------
# início do código
# ------------------------------
# baixar o arquivo 'ver2.rds' nesse link:
# https://db.tt/13dT9XQI
ver2 <- readRDS("~/Downloads/ver2.rds")
grupo <- list()
@roneyfraga
roneyfraga / brew install noevim
Created August 31, 2014 16:23
brew install -v --HEAD https://raw.github.com/neovim/neovim/master/neovim.rb 2>&1
/usr/bin/curl -fLA Homebrew 0.9.5 (Ruby 2.0.0-451; Mac OS X 10.9.4) https://raw.github.com/neovim/neovim/master/neovim.rb -o /Library/Caches/Homebrew/Formula/neovim.rb
% Total % Received % Xferd Average Speed Time Time Time Current
Dload Upload Total Spent Left Speed
0 0 0 0 0 0 0 0 --:--:-- 0:00:01 --:--:-- 0
100 501 100 501 0 0 137 0 0:00:03 0:00:03 --:--:-- 418
==> Cloning https://github.com/neovim/neovim.git
git --git-dir /Library/Caches/Homebrew/neovim--git/.git status -s
Updating /Library/Caches/Homebrew/neovim--git
git config remote.origin.url https://github.com/neovim/neovim.git
git config remote.origin.fetch +refs/heads/master:refs/remotes/origin/master