Skip to content

Instantly share code, notes, and snippets.

View rrodrigueznt's full-sized avatar
😁

Ricardo Rodríguez rrodrigueznt

😁
View GitHub Profile
debug1: Sending environment.
debug1: Sending env LC_CTYPE = UTF-8
Last login: Wed Dec 18 11:19:52 2019 from nodo171
-bash: aviso: setlocale: LC_CTYPE: no se puede cambiar el local (UTF-8): No existe el fichero o el directorio
[ricardo.rodriguez@igfae ~]$
IGFAEDB.Talks.Title#IGFAEDB.OutreachEvents.OutreachEventAbstract#IGFAEDB.OutreachEvents.OutreachEventPlace#IGFAEDB.OutreachEvents.OutreachEventDate
Los rayos cósmicos#Univ. Santiago de Compostela#Bienvenida 1er curso#20190909
Los rayos cósmicos#Univ. Santiago de Compostela#Campus de verano#20190709
The cosmic rays and the Earth's atmosphere#Guadalajara (México)#ORCA Meeting#20190516
El proyecto TRASGO: pasado, presente y futuro#CAB Bariloche##20181214
El laboratorio Cavendish y sus Gentes (El lado humano de un laboratorio)#Fac. de Física Univ. de Santiago de Compostela##20180614
timtrack: a new formalism for charged particle track reconstruction with timing detectors#IFIC, Valencia##20171123
Los rayos cósmicos: otra forma de mirar al cielo y a la tierra (historia de una aventura)#Univ. de Zaragoza##20171124
Cosmic rays: between the Earth and the sky#Univ. de Zaragoza##20171124
Trasgos: otra forma de mirar al cielo#Departamento de Física, Universidad de Santiago de Chile##20170816
#include <stdio.h>
int main(int argc, char **argv) { printf("hello world\n"); }
#
Get-ChildItem -Path $path -Recurse -Filter "*SOMM*" | select FullName
Get-ChildItem -Path $path -Recurse -Filter "*survey*" | select FullName | Out-Gridview
#
write-host "Possible IP addresses:`n"
Get-ChildItem HKCU:\ -rec -ea SilentlyContinue | foreach {
$CurrentKey = (Get-ItemProperty -Path $_.PsPath)
select-string "\b\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\b" -input $CurrentKey -AllMatches | foreach {($_.matches)|select-object Value}
}
write-host "`nPossible URLs:`n"
Superscript, too, is possible! You can use a field coded as:
{QUOTE{SET MergeDate {MERGEFIELD Date}}
{MergeDate \@ "dddd 'the' d"}
{IF{=(MOD({={MergeDate \@ d}+89},100)>2)*(MOD({={MergeDate \@ d}+9},10)<3)}= 1 {=MOD({MergeDate \@ d},10)-2 \# rd;st;nd} th}
{MergeDate \@ "' of' MMMM, yyyy"}
}
IF Expression1 Operator Expression2 TrueText FalseText
IF {MergeDate @\ d}
bob[] <- lapply(bob, as.character)
#
# Installed packages
#
#
ip = as.data.frame(installed.packages()[,c(1:4)])
ip %>% dplyr::filter(stringr::str_detect(Package, "rpart"))
#
remove.packages("tinytex")
#
#
library(readxl)
library(openxlsx) # extremelly slow, but it guess much better column types for locally edited
library(dplyr, warn.conflicts = FALSE)
library(stringr)
library(lubridate, warn.conflicts = FALSE)
library(ggplot2)
#
setwd("C:/Users/Ricardo Rodríguez/Universidade de Santiago de Compostela/IGFAE-Metrics - Documents/DataReceivedFromUSC/")
#
#
options(stringsAsFactors=F)
options(digits=2)
#
#
# returns string w/o leading whitespace
trim.leading <- function (x) sub("^\\s+", "", x)
#
# returns string w/o trailing whitespace
trim.trailing <- function (x) sub("\\s+$", "", x)
#
options(stringsAsFactors=F)
options(digits=2)
#
#
# returns string w/o leading whitespace
trim.leading <- function (x) sub("^\\s+", "", x)
#
# returns string w/o trailing whitespace
trim.trailing <- function (x) sub("\\s+$", "", x)
select Name,Surname,IDCard from IGFAEDB.Personnel order by surname;