Issue with France data for 1994 season

[gbond-1]

Hi -- the season appears to be missing from france.rda.

france_current(Season=1994) returns data but several entries have NA for home and visitor

For referemce:
https://en.wikipedia.org/wiki/1994%E2%80%9395_French_Division_1

[gbond-1]

Worked a bit more on this....

See my comment on 2022, 2023, 2024 season tm fixes. Add the last three to those fixes. Inclusive list below:

tm <-rbind(tm,c("France","AC Ajaccio","Ajaccio",NA))
tm <-rbind(tm,c("France","Clermont Foot","Clermont",NA))
tm <-rbind(tm,c("France","AJ Auxerre","Auxerre",NA))
tm <-rbind(tm,c("France","Le Havre AC","Le Havre",NA)) # fixes a 1994 issue as well

To fix 1994:
tm <-rbind(tm,c("France","AS Cannes-Grasse","Cannes",NA))
tm <-rbind(tm,c("France","FC Martiguese","Martigues",NA))
tm <-rbind(tm,c("France","FC Sochaux","Sochaux",NA))

IMPORTANT -- looks like several rows with NA are returned. I simply deleted them (after fixing the name issue)

france_1994 = france_current(Season=1994)
france_1994 <- france_1994 %>% drop_na()

The league table looks good when compared to this source:

https://en.wikipedia.org/wiki/1994%E2%80%9395_French_Division_1

maketable(france_1994,1994,tier = 1,pts=3)
team GP W D L gf ga gd Pts Pos
1 FC Nantes 38 21 16 1 71 34 37 79 1
2 Olympique Lyon 38 19 12 7 56 38 18 69 2
3 Paris Saint-Germain 38 20 7 11 58 41 17 67 3
4 AJ Auxerre 38 15 17 6 59 34 25 62 4
5 RC Lens 38 15 14 9 48 44 4 59 5
6 AS Monaco 38 15 12 11 60 39 21 57 6
7 Girondins Bordeaux 38 16 9 13 52 49 3 57 7
8 FC Metz 38 16 8 14 50 44 6 56 8
9 AS Cannes-Grasse 38 15 8 15 56 48 8 53 9
10 RC Strasbourg 38 13 12 13 43 43 0 51 10
11 FC Martiguese 38 13 12 13 37 49 -12 51 11
12 Le Havre AC 38 12 13 13 46 49 -3 49 12
13 Stade Rennes 38 12 12 14 53 55 -2 48 13
14 Lille OSC 38 13 9 16 29 44 -15 48 14
15 SC Bastia 38 11 11 16 44 56 -12 44 15
16 OGC Nice 38 11 10 17 39 52 -13 43 16
17 Montpellier HSC 38 9 14 15 38 53 -15 41 17
18 AS Saint-Etienne 38 9 11 18 47 55 -8 38 18
19 SM Caen 38 10 6 22 38 58 -20 36 19
20 FC Sochaux 38 6 5 27 29 68 -39 23 20

[gbond-1]

Might be better for Clermont to do this (since I see Clermont Foot 63 already in the history)

tm <-rbind(tm,c("France","Clermont Foot 63","Clermont",NA))