pinecone: Add embedding Inference Support (#24515)

**Description**

Add support for Pinecone hosted embedding models as
`PineconeEmbeddings`. Replacement for #22890

**Dependencies**
Add `aiohttp` to support async embeddings call against REST directly

- [x] **Add tests and docs**: If you're adding a new integration, please
include

Added `docs/docs/integrations/text_embedding/pinecone.ipynb`


- [x] **Lint and test**: Run `make format`, `make lint` and `make test`
from the root of the package(s) you've modified. See contribution
guidelines for more: https://python.langchain.com/docs/contributing/

Twitter: `gdjdg17`

---------

Co-authored-by: Erick Friis <erick@langchain.dev>

libs/partners/pinecone/tests/integration_tests/test_embeddings.py

@@ -0,0 +1,76 @@
+import time
+
+import pytest
+from langchain_core.documents import Document
+from pinecone import Pinecone, ServerlessSpec  # type: ignore
+
+from langchain_pinecone import PineconeEmbeddings, PineconeVectorStore
+
+DIMENSION = 1024
+INDEX_NAME = "langchain-pinecone-embeddings"
+MODEL = "multilingual-e5-large"
+
+
+@pytest.fixture()
+def embd_client() -> PineconeEmbeddings:
+    return PineconeEmbeddings(model=MODEL)
+
+
+@pytest.fixture
+def pc() -> Pinecone:
+    return Pinecone()
+
+
+@pytest.fixture()
+def pc_index(pc: Pinecone) -> Pinecone.Index:
+    if INDEX_NAME not in [index["name"] for index in pc.list_indexes()]:
+        pc.create_index(
+            name=INDEX_NAME,
+            dimension=DIMENSION,
+            metric="cosine",
+            spec=ServerlessSpec(cloud="aws", region="us-east-1"),
+        )
+        while not pc.describe_index(INDEX_NAME).status["ready"]:
+            time.sleep(1)
+
+    yield pc.Index(INDEX_NAME)
+
+    pc.delete_index(INDEX_NAME)
+
+
+def test_embed_query(embd_client: PineconeEmbeddings) -> None:
+    out = embd_client.embed_query("Hello, world!")
+    assert isinstance(out, list)
+    assert len(out) == DIMENSION
+
+
+@pytest.mark.asyncio
+async def test_aembed_query(embd_client: PineconeEmbeddings) -> None:
+    out = await embd_client.aembed_query("Hello, world!")
+    assert isinstance(out, list)
+    assert len(out) == DIMENSION
+
+
+def test_embed_documents(embd_client: PineconeEmbeddings) -> None:
+    out = embd_client.embed_documents(["Hello, world!", "This is a test."])
+    assert isinstance(out, list)
+    assert len(out) == 2
+    assert len(out[0]) == DIMENSION
+
+
+@pytest.mark.asyncio
+async def test_aembed_documents(embd_client: PineconeEmbeddings) -> None:
+    out = await embd_client.aembed_documents(["Hello, world!", "This is a test."])
+    assert isinstance(out, list)
+    assert len(out) == 2
+    assert len(out[0]) == DIMENSION
+
+
+def test_vector_store(
+    embd_client: PineconeEmbeddings, pc_index: Pinecone.Index
+) -> None:
+    vectorstore = PineconeVectorStore(index_name=INDEX_NAME, embedding=embd_client)
+    vectorstore.add_documents([Document("Hello, world!"), Document("This is a test.")])
+    time.sleep(5)
+    resp = vectorstore.similarity_search(query="hello")
+    assert len(resp) == 2