r cannot open the connection code example

Example: Error in file(file, "rt") : cannot open the connection

directory <- ("./specdata")