How to reset Office 2007/2010 (Outlook and Word) normal template back to default on Vista/Windows7

Question

Is it possible write the following vector without losing precision? The write.table documentation says that it has an internal equivalent of 'digits = 15' and it looks like scipen is being ignored.

a <- c(0.1111111111111123333, 0.11111111111111244, 0.1111111111111121111111)
options(scipen=22)
write.table(a, file="del.txt")

Solution

My Normal.dotm seems to be located in C:\Users\Username\AppData\Roaming\Microsoft\Templates

Where Username is my User account name.

Windows 7 32bit Office 2010 Pro

Word recreates the file if deleted, just like older versions. (tested)

Comments

[cannin]

if I run the two commands: a <- c(0.1111111111111123333, 0.11111111111111244, 0.1111111111111121111111) write.table(format(a, digits=20), file="del.txt") i get a different output than the input: "x" "1" "0.11111111111111234007" "2" "0.11111111111111243721" "3" "0.11111111111111211802"