jonnyrobbie

#/usr/bin/env RScript
require("readODS")
require("reshape2")
require("ggplot2")
rm(list=ls())
setwd("~/RWD")
sheet <- read_ods("gfx_linux_comp.ods", sheet="data", col_names=TRUE)
melted <- melt(sheet, id.vars=c("model", "brand", "manufacturer", "price", "price-msrp", "price-low"))

lm_model <- lm(log(value)~log(price)+brand, data=melted)

jonnyrobbie

require("ggplot2")
require("reshape2")
data <- t(read.table("allgenres.tsv", sep="\t", header=T, row.names=1))
data <- as.data.frame(data)
data <- subset(data, select= -`\\N`)
data <- data[24:124,]
data$Total <- rowSums(data)
data <- as.matrix(data)
share.data <- data/data[,"Total"]
share.data <- subset(share.data, select= -Total)

jonnyrobbie

#!/usr/bin/env RScript

#require(ggplot2)
require(plotly)
require(reshape2)

data <- data.frame(
	y=c(13, 5, 22),
	x1=c(4, 13, 15),
	x2=c(35, 24, 67))

jonnyrobbie

Computer Information:Manufacturer: Gigabyte Technology Co., Ltd.
Model: AB350-Gaming-CF
Form Factor: Desktop
No Touch Input Detected
Processor Information:CPU Vendor: AuthenticAMD
CPU Brand: AMD Ryzen 5 1600X Six-Core Processor
CPU Family: 0x17
CPU Model: 0x1
CPU Stepping: 0x1
CPU Type: 0x0