R devel - Mar 2003 - writing to file with encodings (PR#2674)

Full_Name: Jean-Pierre Müller
Version: 162
OS: Mac OS (carbon)
Submission from: (NULL) (130.223.101.43)


Encodings valid only in rwading files? The following give identical output
files.

"ascii" <-
 c( 
 "\040","\041","\042","\043","\044","\045","\046","\047",
# 040-047
 "\050","\051","\052","\053","\054","\055","\056","\057",
# 050-057
 "\060","\061","\062","\063","\064","\065","\066","\067",
# 060-067
 "\070","\071","\072","\073","\074","\075","\076","\077",
# 070-077
 "\100","\101","\102","\103","\104","\105","\106","\107",
# 100-107
 "\110","\111","\112","\113","\114","\115","\116","\117",
# 110-117
 "\120","\121","\122","\123","\124","\125","\126","\127",
# 120-127
 "\130","\131","\132","\133","\134","\135","\136","\137",
# 130-137
 "\140","\141","\142","\143","\144","\145","\146","\147",
# 140-147
 "\150","\151","\152","\153","\154","\155","\156","\157",
# 150-157
 "\160","\161","\162","\163","\164","\165","\166","\167",
# 160-167
 "\170","\171","\172","\173","\174","\175","\176",
# 170-177
 "\200","\201","\202","\203","\204","\205","\206","\207",
# 200-207
 "\210","\211","\212","\213","\214","\215","\216","\217",
# 210-217
 "\220","\221","\222","\223","\224","\225","\226","\227",
# 220-227
 "\230","\231","\232","\233","\234","\235","\236","\237",
# 230-237
 "\240","\241","\242","\243","\244","\245","\246","\247",
# 240-247
 "\250","\251","\252","\253","\254","\255","\256","\257",
# 250-257
 "\260","\261","\262","\263","\264","\265","\266","\267",
# 260-267
 "\270","\271","\272","\273","\274","\275","\276","\277",
# 270-277
 "\300","\301","\302","\303","\304","\305","\306","\307",
# 300-307
 "\310","\311","\312","\313","\314","\315","\316","\317",
# 310-317
 "\320","\321","\322","\323","\324","\325","\326","\327",
# 320-327
 "\330","\331","\332","\333","\334","\335","\336","\337",
# 330-337
 "\340","\341","\342","\343","\344","\345","\346","\347",
# 340-347
 "\350","\351","\352","\353","\354","\355","\356","\357",
# 350-357
 "\360","\361","\362","\363","\364","\365","\366","\367",
# 360-367
 "\370","\371","\372","\373","\374","\375","\376","\377"
# 370-377
 ) 

 zz <- file("out_isolatin1.txt", "wt",
encoding=ISOLatin1)
 cat(ascii,file = zz, sep=" ")
 close(zz)

 zz <- file("out_winansi.txt", "wt", encoding=WinAnsi)
 cat(ascii,file = zz, sep=" ")
 close(zz)

 zz <- file("out_macroman.txt", "wt", encoding=MacRoman)
 cat(ascii,file = zz, sep=" ")
 close(zz)

 zz <- file("out_native.txt", "wt", encoding=native.enc)
 cat(ascii,file = zz, sep=" ")
 close(zz)

>From ?file:
     The encoding vector is used to map the input from a file or pipe
                                            ^^^^^ 
     to the platform's native character set.  Supplied examples are
     `native.enc' as well as `MacRoman', `WinAnsi' and
`ISOLatin1',
     whose actual encoding is platform-dependent.  Missing characters
     are mapped to a space in these encodings.

Please don't send bug reports without reading every single line in the
help page.  See the R FAQ for the definition of a bug: this should have 
been sent as a question to R-help, where we could have pointed you to the 
help page.

On Mon, 24 Mar 2003 jean-pierre.mueller@dssp.unil.ch wrote:
> Full_Name: Jean-Pierre M?ller
> Version: 162
Probably you meant 1.6.2?
> OS: Mac OS (carbon)
> Submission from: (NULL) (130.223.101.43)
> 
> 
> Encodings valid only in rwading files? The following give identical output
> files.
-- 
Brian D. Ripley,                  ripley@stats.ox.ac.uk
Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~ripley/
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272866 (PA)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595