djhurio

https://github.com/valinet/ExplorerPatcher

https://www.autohotkey.com/

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.

^!Insert::Send {Media_Play_Pause}

djhurio

# Piemērs CSP datu importam ar pxweb
# Vairāk lasīt:
# https://htmlpreview.github.io/?https://github.com/rOpenGov/pxweb/blob/test/vignettes/pxweb.html

library(pxweb)

# API URL
px_url <- "https://data.stat.gov.lv/api/v1/lv/OSP_PUB/START/VEK/IK/IKP/IKP020"

# Metadati

djhurio

# Deaths by week

options("max.print" = 1e4)

library(eurostat)
library(data.table)
library(ggplot2)
library(ISOcodes)

cntry <- as.data.table(ISO_3166_1)

djhurio

# n: Nodarbināto skaits uzņēmumā
# v: Vietējo vienību skaits uzņēmumā

# n <- 5
# v <- 3

rm(list = ls())
gc()

gen.all.matrix <- function(n, v) {

djhurio

                                                                                                                                                                                                    1                                                                                                                                                                                                     
                                                                                                                                                                                                  1 0 1                                                                                                                                                                                                   
                                                                                                                                                                                                0 0 1 0 0                                 

djhurio

# https://codegolf.stackexchange.com/questions/138570/disappearing-elements

f=function(S,X)Reduce(`[`,-X-1,S,,T)

f(el(strsplit("codegolf", "")), c(1, 4, 4, 0, 2))

f(el(strsplit("abc", "")), 0)

f(el(strsplit("abc", "")), vector("integer"))

djhurio

# Stirnu buks
# 2017
# Pokaiņi
# Distance: Buks

require(rvest)
require(data.table)
require(ggplot2)

djhurio

### Apsekojumu statistika
### Praktiskie darbi 5
### Precizitātes novērtēšana


# Bibliotekas ####
require(data.table)
require(sampling)
require(foreach)
require(ggplot2)

djhurio

### Apsekojumu statistika
### Praktiskie darbi 4


# Bibliotekas ####
require(data.table)
require(sampling)
require(foreach)
require(ggplot2)
require(tools)

djhurio

### Apsekojumu statistika
### Praktiskie darbi 3

# Bibliotekas ####

# Bibliotēku instalācija, ja nepieciešams
# install.packages(c("Rcpp", "BalacedSampling", "sampling"))

require(data.table)
require(sampling)