update

.Rhistory

@@ -243,3 +243,30 @@ source('C:/Users/Birte/Desktop/Projektarbeit Neurokognitive Psychologie/Data_ana
 tiff(file=paste(here(),"/Figures/ReactionTimes/MemoryGuided/Session1/RT",filename,".tiff"),
 width=6, height=4, units="in", res=100)
 source('C:/Users/Birte/Desktop/Projektarbeit Neurokognitive Psychologie/Data_analysis/MemoryGuided/FiguresReactionTimesMemoryGuided.R')
+rm(list = ls())
+x=5
+y=3
+# Beispiel
+w1="Hello"
+w2="World"
+v1 = c(0,1,2,3)
+v2 = c(x,y)
+w3=c(w1,w2)
+x==5
+= matrix( c('a','a','b','c','b','a'), nrow = 2, ncol = 3)
+M = matrix( c('a','a','b','c','b','a'), nrow = 2, ncol = 3)
+View(M)
+library(here)
+our_data=load(paste(here(), "/Data/Prosaccade/Session1/3130B6S3 SaccadesToTarget"))
+our_data=load(paste(here(), "/Data/Prosaccade/Session1/3130B6S3 SaccadesToTarget", spe=""))
+(here()
+)
+our_data=load(paste(here(),"/Data/Prosaccade/Session1/3130B6S3 SaccadesToTarget", sep=""))
+our_data=load(paste(here(),"/Data/Prosaccade/Session1/3133B1S1 SaccadesToTarget.Rdata", sep=""))
+print(ds_right)
+head(ds_right)
+View(ds_right)
+for (i in 1:10){
+print (i)
+}
+View(ds_right)

.gitignore

+.Rproj.user
+.Rhistory
+.RData
+.Ruserdata

Data_analysis/Prosaccade/TargetSaccadeProsaccade.R

@@ -46,6 +46,7 @@ for (f in 1:length(files)) {
      height=10,
      width=12)
      print(p)
+     
   #collect data across blocks
   if (f == 1) {
     # falls das das erste File ist, sammeln wir die Daten direkt in "coranti_sac" und "falsepro_sac"

Data_analysis/startR.R

+library(ggplot2)
+library(dplyr)
+library(data.table)
+library(here)
+
+# Einführung in dir R Prgrammierung
+
+# Variablen 
+# es gibt verschiedene Datentypen  
+#für uns interessant sind numerische Variablen (Zahlen) und character (Buchstaben)
+# Beispiel numerische Variablen
+x=5
+y=3
+# Beispiel
+w1="Hello"
+w2="World"
+
+# Mathematische Operatoren + - * /
+
+# Aufgabe1: addiere x und y und speichere sie in einer neuen Variablen
+
+
+# Zahlen können zu Vektoren und Matrizen kombiniert werden
+v1 = c(0,1,2,3)
+v2 = c(x,y)
+
+M = matrix( c('a','a','b','c','b','a'), nrow = 2, ncol = 3)
+# Aufgabe 2: fasse w1 und w2 zu einem vector zusammen und speichere sie in einer neuen Variablen
+# Ändere die Anzahl Reihen und Spalten der Matrix M
+
+
+
+# indizes für Vektoren und Mtrizen
+idx1=v1[3]
+idx2=M[1,1]
+
+# Aufgabe: welcher Buchstabe steht an 4. Stelle in w1?
+
+
+
+# weiterer Datentyp: Logicals "TRUE" und "FALSE" und Logical Operators (== != < >)
+x==5
+# Aufgabe: finde heraus ob y kleiner 2 ist
+
+
+
+# komplexer Datentyp dataframe = Tabelle 
+BMI <- 	data.frame(
+  gender = c("Male", "Male","Female"), 
+  height = c(152, 171.5, 165), 
+  weight = c(81,93, 78),
+  Age = c(42,38,26)
+)
+
+print(BMI)
+# Aufgabe: Was enthalten die Spalten? Was enthalten die Zeilen?
+# Was wird angezeigt wenn ihr folgenden Befehl ausführt: BMI$gender? 
+
+
+load(paste(here(),"/Data/Prosaccade/Session1/3133B1S1 SaccadesToTarget.Rdata", sep=""))
+View(ds_right)
+# Aufgabe: Was enthalten die Spalten? Was enthalten die Zeilen?
+
+
+
+# Operatoren: for-Schleife 
+# wiederholt eine Abfolge von Befehlen mehrmal hinter einander 
+
+for (i in 1:10){
+  print (i)
+  
+}
+
+v3 = c(2,4,6,8)
+v4=c(1,3,5,7)
+
+# addiert v3 und v4 paarweise 
+
+
+
+
+
+
+
+
+
+
+
+