Проблема с записью CSV-файла с использованием R в 14.04

Я только что установил, я успешно выполнил математический расчет с R. Затем я попробую следующее:

> var1 <- 1:5
> var2 <- (1:5) / 10
> var3 <- c("R", "and", "Data Mining", "Examples", "Case Studies")
> df1 <- data.frame(var1, var2, var3)
> names(df1) <- c("VariableInt", "VariableReal", "VariableChar") 

После создания data frame я попытался записать в sampleData.csv, что я делаю следующее:

> write.csv(df1, "./data/sampleData.csv",row.names = FALSE)

Я получил ответ [ERROR] как,

Error in file(file, ifelse(append, "a", "w")) : 
cannot open the connection
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
cannot open file './data/samplData.csv': No such file or directory
>

Я использую Ubuntu 14.04, и я запускаю этот код в терминале.

Проблема в каталоге.

, когда я это делаю,

> getwd()

получил ответ как,

[1] "/home/arul"  

Но в этом каталоге нет пакета r. Я не могу найти, где находится мой R, я использовал apt-get install -y r-base, так как мне установить путь как установленный R?

EDIT 1

Я создаю папку data в текущем каталоге /home/arul как принято R, а затем я попытался написать csv,

> write.csv(df1, "./data/sampleData.csv",row.names = FALSE)

Теперь я получил разрешение,

Error in file(file, ifelse(append, "a", "w")) : 
cannot open the connection
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
cannot open file './data/dummyData.csv': Permission denied

Как это решить?

ИЗМЕНИТЬ 1

root@arul-PC:/home/arul# stat data
File: ‘data’
Size: 4096          Blocks: 8          IO Block: 4096   directory
Device: 809h/2057d  Inode: 3147229     Links: 2
Access: (0755/drwxr-xr-x)  Uid: (    0/    root)   Gid: (    0/    root)
Access: 2014-07-18 12:42:00.057099167 +0530
Modify: 2014-07-18 12:41:59.041099204 +0530
Change: 2014-07-18 12:41:59.041099204 +0530
Birth: -

ИЗМЕНИТЬ 3

> system('whoami', intern=TRUE)
[1] "arul"