# der wahrscheinlich bescheuerteste Beitrag aller Zeiten (und heute mal in englisch)
# ich fang auch grad erst an mit R 😉

setwd(„universe“)
me<-read.delim(„undjetzterst“)



install.packages(„weird.thinking“)
library(weird.thinking)

class(me)
carbon based lifeform

levels(me)
„body“ „mind“

me$mind[2:8]
[2]dada
[3]cats
[4]neurophilosophy
[5]this is not vegan
[6]I like flowers
[7]chaos
[8]1Q84

length(me$mind)
infinitely expanding

str(me$body)
lots of cells, water, minerals and bacteria

me$body/46
Error in body/46 : non-numeric argument to binary operator (don’t try to divide yourself please o.O)

class(me$body)
somehow female
as.vector(me$body)
„X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“,“X“

str(me$mind)
Error in str(me$mind) : not answered by current science

na.remove(me$mind) # coolest mindhack ever (???)
class(me$mind)
Software-like emergent semi-philosophical construct with a basis in biology, I guess

############# I love „hashtags“ #################### uhhh #####################

lemon.juice<-read.delim(„what_I_have_in_my_fridge“)

str(lemon.juice)
watery, acid-like, organic liquid, translucent and yellow

me+lemon.juice
niiiice
sqrt(lemon.juice)
lemon tree
sqrt(sqrt(lemon.juice))
sun, water and carbon dioxide
me$mind[5]+lemon.juice
FALSE

t.test(me, lemon.juice)

Funny Two Sample t-test

data:  me and lemon.juice

t = tamteramtam, df = damn furry, p-value = 0.0002
alternative hypothesis: I'm something else than lemon juice

95 percent confidence interval:
well, you're sort of... eh no.  You are human, you silly! :D

sample estimates:
mean of me    mean of lemon.juice 
Breathing.    Full of Vitamin C.

corr.test(me$mind,me$body)

        Pearson's funny-moment correlation

data:  me$mind and me$body

t = tufftuff, df = dog folder, p-value = 0.009
alternative hypothesis: I am a whole being

95 percent confidence interval:
Sometimes I am, sometimes I have depersonalization, but this is only a feeling.

sample estimates:
      cor 
0.7487974

q() # that’s it for now, I’m just a beginner 😀 (and did not have the patience for putting graphs here :P)