I am having trouble plotting the graph. Everytime I try to plot it, instead of a line graph, I get a histogram like this -

![enter image description here](https://i.stack.imgur.com/jlhQY.jpg)

I have attached the link to the csv file - <https://docs.google.com/spreadsheets/d/1qaTqw9sSoOpeKIa5GnHr2cJ2_DKBb1-89eTukTtrKOQ/edit?usp=sharing>

First 4 lines of data

```
Date        Comid       Low     High    Average Close   Trdno   Volume  Turnover    Company
01-01-2005  14,259.00   138.60  139.10  138.84  138.80  14.00   1,500.00    208,230.00  BRITISH AMERICAN TOBACCO BANGLADESH COMPANY LIMITED
02-01-2005  14,259.00   139.00  140.00  139.43  139.40  24.00   2,750.00    383,665.00  BRITISH AMERICAN TOBACCO BANGLADESH COMPANY LIMITED
03-01-2005  14,259.00   138.50  139.00  138.70  138.60  26.00   3,600.00    499,300.00  BRITISH AMERICAN TOBACCO BANGLADESH COMPANY LIMITED
04-01-2005  14,259.00   135.20  138.50  136.76  136.70  23.00   2,300.00    314,865.00  BRITISH AMERICAN TOBACCO BANGLADESH COMPANY LIMITED

```

I am trying to plot the 6th column (the one titled "Close" and I typed the following commands.

```
batbc <- read.csv("batbc.csv")
plot(batbc[, 6], type="l")

```